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B.l PROGRfifl 2 XSER sE-EriCMS 
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PRiGRfiM OrSMS 'EST5 CONTIGUOUS nEMCRY ADDRESS ^^RCr* 
GOOOCC TO 75777b. IT VERIFIES THAT EftCH ADDRESS 
IS UNIQUE '.AN ADDRESS TEST) AND THAT EACH MEnORv 
LOCATION CAN BE READ'WRITTEN RELIABLY (WORST CASE 
NOISE TESTS). IF MEWORY MANAGEMENT 15 AVAILABLE. 
All testing is PERFORMED UITH MEMORY MANAGEf^N* 
ENABLED. (UNLESS DISABLED). 

THIS PRO'GRAM ^Ai BE USED TO ADJUST MARGIN M£"*:R.. 

A..SC INCLUDED IS A TOGGLE IN ADDRESS TES'. 

A.SO INCLUDED IS THE BRANCH GCBBlE «CS ""ES". ^::E 
^HAT ONLY SECTIONS 9.1 THROUGn 9.H AORlY TC bRhNC^i 
<jt/SBkiE. 
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PCP-11 0-124K MEMORY EXERCISER 
REQLIREKENT5 



CHAPTER i 
REQLIRE1ENT5 

l.I EOLlPfCN' 

THE POP-ii FfiftlLY PROCESSOR WITH 9K riEMORY. 
OPTICNRL... 

m-C OR KTli-D MEnORY fWNfiGEMENT OPTION OR «F11 PRRITY :FT::n. 
l.S STORAGE 

SRCWAH STORAGE - THE PROGRflfl JSES .lErORY 2-17777. 
1.3 PRELIMINARY PROGRAMS 

IPDP-ll FAMILY ir^STRL'CTICN EXERCISER -OCGKC OR "bZOKC' KTU-C if. 
LOGIC TESTS. 



T|ST ^rais-i 



Ql 



27a PCP-:i C-i2MK riEflORV EXERCISER 

271 LOADING AND STARTING PRjCELwRE 

r-fi. 

£. "J 

£9- 

30- 

=32 

to Wto 

|i| • CHAPTER 2 

lie LOADING AND STARTING PROCEDURE 

sea 

to to « 

2?Q 

1?^ lChD PRCGRAH into memory U5INU ABS LOADER. 



£94 LOAD ADDRESS 200 

SET suir - — 

PRESS S 



£55 5EL5"i|j^|N DESIRED POSITION (SEE CHAPTER 3\ 



=39 ASTERISK WILL BE PRINTED AFTER EACH PASS. 

|c| -D20MB DONE!" UILl SE PRINTED AFTER S PASSES. 

20: =A5S CC'JNT MAY 3E MONITORED IN THE DISP-A^' REGISTER .11 -^E 

3g2 ' LOCATION 75b. 

•ana 

33S NOTE 
30& 

3C7 THIS PROGRAM SAVES "'HE LOADERS SOOT Ah: 

529 ABS. TO RESTORE THE LOADERS. RESTART AT 

300 162. BEFORE RESTARTING INSUftE THAT T-^E 

3:C PROGRAM IS NOT RELOCATED. IF 'HE 

3ii PROGRAM IS RELOCATED. THE PC UI^L 

713 INDICATE UHICH BANK CONTAINS THE 

3:3 PROGRAM. NEXT START THE PROGRAM AT ♦* 

314 12354. WHERE » = BITS 13-15 OF THE K. 

315 THE PftOGRAM WILL RELOCATE BACK TO 0-4k 

AND HALT AT i7b. PRESS CONTINUE 'C 

31' RESUME TESTING. 



3*9 



z.i hcti: operation 

IF 'HE PROGRAM IS RUN IN QLICk ',EFIF^ MODE uNDER ACTU ThE FRCGRA^ 
:C:€ AFTER THE FIRST PASS. ALSC 'HE PROGRAM DOES NOT RELCCATE '. 
'I'E >:.4ER 4K OF MEMORY, 



HOI 



:r :zir.s-i :-:£T^ .ie-v'^v e^i«::sef rj^cvu 27.7325 ic-5E«»-rfc ii.-ss pfiiE s 



32a ■ *»rp-:i c-i2MK f€»ioRY e>ir:iser ^^al £ 

32- suit:h settings 

-3=0 

329 
232 

332 

335 
■:'3z 

« 

33£i 
■s-a- 

23S 
33« 

3^2 CHAPTER 3 

2^4 SUrCH SETTINGS 

3M5 

3-46 

2HT 

3HS SU15=1 OS LP HALT ON ERROR 

-en 

3|| NOTE 

353 IF SW1S=1 WHEN AN ERROR OCCURS THE 

3=-4 PROGRAM WILL HALT. AND THE CuRRECT DATA ' 

2=E WILL NOT BE LOADED INTO Trie FAIlINS 

3Ed address. if SUiS IS RAISED AFTER THE 

357 ERROR TYPEOUT BEGINS. THE PROGRAM UILL 

358 HALT WHEN THE TYPEOUT COMPLETES AND THE 

359 CORRECT DATA UILL BE LOADED INTO THE 
36: FAILING ADDRESS. 

3s: 

3&2 

3b3 SUlHsl CR L'P LOOP SUBTEST 

364 

36S 3wl3=i OP UP IWIBIT ERROR TYPEOUT 

367 SW12=1 OR UP INHIBIT LSE OF MEMORY MANAGEMENT 
369 

272 NOTE 
371 

372 INHIBITING THE USE OF MEMORY MANAGEMENT 

373 CAN BE DONE ONLY WHEN THE PROGRAM IS 

374 STARTED. IF THE USE OF MEMORY 
37E MANAGEMENT IS INHIBITED THE LAST ADDRESS 
376 AS TYPED BY THE PROGRAM WILL ONLY 

277 REFLECT THE AMOUNT OF MEMORY UP TO 29K 

278 (LAST ADDRESS = ifeOOQO). 

St? 

Is: s^iui :r jf inhisit subtest itera'icn 



« 
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SWlCsl OR UP RI.HG SELL ON ESftvR 



JOl 

'EST ::a.^5-i 3-:2•t^ mekory exerciser macyh zt^?3Z) ic-SEP-rb ii:S9 page 12 

SS"* PCP-il C-ia4K MEMORY EXERCISER PAGE 

3S5 SWITCH SETTINGS 

39& 
207 

393 SW9=1 OR llF DISPLAY ERROR COUNT IN DISPLftf REGIE"'E= 

3IO 5l.'«»=0 OR DCUN DISPLAY PfiSS COUNT IN DISPLAY REGIsTER 
391 

2^2 -- - £US=1 OF JP-- - . HALT PBOSRAM- LNRELOrftTSD ^np. ^:f:!r5= . 

393 

394 SW5=1 OR LP iriHIBIT PmRIT^ ERROR DET£:t::n IMTr^ 

395 START JP ONLY) 
396 

397 

398 NOTE 

400 UITH PARITY ERROR DETECTION ENABLED^ A 

401 MEMORY FAILURE WILL CAUSE A PARITY 
4D2 ERROR. THE ERROR PRINTOUT ON A PARITY 

403 ERROR DOES NOT TYPE THE GOOD DATA. 

404 THUS. A BIT DROP OR PICKUP UILL NOT BE 
425 TYPED AS SUCH. IT IS BEST TO RUN THE 
4Cs PROGRAM FOR 1 PASS i UNTIL AN ♦ IS TYPED ^ 
427 UITH PARITY DISABLED. THEN RESTART "HE 
tZB . PROGRAM UITH PARITY ENASlEC. 
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■♦29 PDP-11 C-12HK MEMORY EXERCISER =h^E IC 

-HO SU9S0UTINE ABSTRACTS 

Sli 

-»:2 

•41-4 

lis 

■ • ^ 

419 

-2: 

■421 
■422 
-23 
m24 

i25 CHAPTER -» 

•42o 

■427 SUBROUTINE ABSTRACTS 

-423 

t29 

•4"Ci 

t2: H.l SCOPE 

•435 THE PROGRAM STORES IN Rl THE PC OF THE LAST 'EST SwCCESS'-..^ EXECE: 

^2-, AND MAY BE USED AS AN AID IN DEBUGGING IF THE PPCGRAr^ 'B:'*3S' 3£:A«S£ 

-3S CF A HARDWARE TAILuRE. 
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H3b PDP-li 3-i2HK riEHORY EXERCISER PAGE li 

M37 ERRORS 

439 

439 

442 

441 

442 

443 

444 

445 

44b 

447 

448 

449 

450 

H52 CHAPTER 5 

453 

454 ERRORS 

455 

45fe 

hIs these tests print out the PC WHERE THE ERROR WAS DETECTED. THE FAILING 

4=0 ADDRESS. THE GOOD DATA, AND THE BAD DATA I.E. 

4bO 

Hbl PC=XXXXXX ADDRESS AAAAAA GOOD DATA GGGGGG BAD DATA BBBBB9 

■Ib2 

4t2 the address of the failing location is the true 18 bit physical 

«b4 address. 

4fc5 
4bb 

4b7 NOTE 
4b8 

4b9 WHEN TESTING MEMORY LOCATIONS 0-17776 

47: THE PC TYPED WILL BE P mLTIPLE 0^ 200DD 

if-1 GREATER THAN REFLECTED IN THE PROGRAM 

472 LISTING. 
473 

475 THE ADDRESS OF THE BAD DATA IS IN (R2J -2 

47b 

477 THE GOOD DATA IN RO 

478 

479 THE BAD DATA IN R3 

490 

491 THE ADDRESS OF GOOD DATA IS IN R4 (RANDOM DATA TEST ONLY). UHEN AN 

482 ERROR IS DETECTED UHEN EXERCISING THE MEMORY USING THE WORST CASE 

493 NOISE PATTERNS, THE JSER SHOULD RESTART THE PROGRAM SELECTING PROGRAM 

484 (SEE CHAPTER 9 FOR DETAILS) SELECTING THE APPROPRIATE PARAMETERS. THE 

435 USER CAN USE THE PC AND ADDRESS OF THE FAILURE TO SELECT THE PROPER 

49b COPE BflNK(S; AFFECTED AND ALSO THE SPECIFIC PATTERN. THIS ALLOWS 

497 MAXIMUM SCOPE CAPABILITIES. 

-39 

499 

t92 

J9: t.l PARITY ERP^R 
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HSH PDP-11 0-124K MEMCKY EXERCISER Ffi&E 12 

4% ERRORS 

4% 

497 

498 ACTION ENABLE BIT SET (BIT D). IF fi PARITY ERROR IS DETECTED THE 

499 PROGRAM WILL TYPE: 
500 

501 PARITY ERROR 

502 

503 AND SCAN MEMORY FOR THE ADORESSCES) CAUSING THE PARITY ERROR(Sj. WHEN 

504 THE PARITY ERROR IS DETECTED AN ERROR WILL BE TYPED AS SHOWN BELOW: 

50& PC=XXXXXX ADDRESS AAAAAA BAD DATA BBBB3B 

509 PRESS CONTINUE OR RESTART TO RESUME TESTING. F A PARITY ERROR IS NOT 

509 DETECTED ON SCAN THE PROGRAM WILL TYPE: 

510 

511 PARITY ERROR NOT FOUND ON SCAN 

Ii3 PC=XXXXXX ADDRESS=AAAAAA 

514 

515 WHERE: 
51& 

517 AAPAAA=PC AT TIME PARITY ERROR WAS DETECTED, 

518 

519 

520 NOTE 

522 PARITY IS DISABLED WHEN THE PROGRAM IS 

523 RELOCi^TED. 
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|-5 CHAP'EP ' 

H riSCELLflNEC-s 

=-a 

£-5 

Sa- 

55; IF THE FSCififin HALTS IN THE TRAP' INTERRUPT '.ECTOR AREA .C-i::: . 

c== EXPr^INE REGISTER & vTHE STACK PTR\ R& CCN'AINS THE A::RE53 «.-£«£ '"t 

55? P: CF 'HE INSTRUCT I :N THAT CAU5EC THE TRAP ASCRT 15 STCRE:. SEE --=; 

||; p: s: specifies the last test ccnPLE"^EO-.. 

11* NC'E 



col THE PDPil'HS UI.L DI§PLfi> THE 'RAP 

=5: VECTOR ACCR£SS*4 IN THE ADDRESS ^OTS. 

lil THUS. A TRAP TC 4 ;§LS ERRgS^ ^I-. 

DISPLAY 10 IN THE ACCRES! ..liH'S. 



"A STAC^ POI^^TtR 

'-£ s'ACk POINTER 

A"' THE START OF EACH SUBTES 



-£ s'ACk POINTER IS iNriAU" S£^ ^C SZ2. ANC IS «:£=£' 





7.2 PASS COUNT 

SEVEN PASSES ARE REQUIRED FOR CCttPLETICN CF THIS PRCiRAr: 5' «-:> 
TIME AN -♦- WILL BE PRINTED. THE PASS COUNT lA^ 3^ CSSESVEC S"- 
'JPNING THE SWITCH TO THE DISPLAY POSITION. ,'HE PASS CClNT I= A.aC 

STORED IN LOCATION J — " ' ' 

EVENT THAT THE PROGRAn 

^hE DISPLAY REGISTER .• .t-v^j 

INDICATES THAT THE PROGPA^ IS IN ITS RE.CCA'E: 




002 



• • 3 E^Rw^f • wmN • 



E02 

£\E«J::5ER MACMI 27^321 iC-SEP-rs ll:5<3 Phit 12 



oCP-li C-i2HK riEMORY EXEPCIbER =-j£ 1 

lISCELLflNEOLlS 

EACH 'IflE AN ERROR OCCURS. THE ERROR COUNT IS iNCPIfftSTEC. 'rE 1==; 
::jNT can be OBSERVEP SY T-jRhlNS THE S^JlTCh THE z:i'^^ 
AND SETTING SWITCH 9, .THE ERROR COJNT IS ALSO S^ZP.EC I'* J/.'^'V. 
1002.) THE PROGRAH will COUNT 17777(0CTml ERRCfiS: M l^^'fi : 
NO" INCREMENTED PAST THIS VA' UE. NOTE 'HAT BIT 15. >^ ' 

REGISTER. IS NOT PART OF ThE EPPCC CC-N^. BI' it. I- CN. 



THE PROGRAM IS IN ITS RELOZATEC ZtC-E. 



7.^ ::5F.Av REGISTER 

EITHER THE PASS COjr CR THE ERROR CCu*iT IS DISF^AVEC IN 'HE Zll'^n 
REGISTER. THE COUNT TO 3E DISPLAYED IS CONTROLLED 3Y THE St^INi : 
SWITCH 9. SIT 15 OF THE DISPLAY REGISTER. HOWEVER. IS -3ED AS 
nELCCATION INDICATOR AND 13 NOT PART OF EITHER THE PASS CC-NT :c 
ERRCfi COUNT. WHEN BIT i£ IS ON. THE PROGRAM IS OERFORriNG A RE-CIA'E 
CYC^E. UHEN THE PROGRAM IS RELOCATED. ^hE SPECIAL PESTAP' Fc::£:.5£ 
OF CHAPTER 2 MUST BE FOLLOWED. 



7.5 PROGRAM RELOCATION 



*HEN THE PROGRAM IS RELOCATED. VERIFICATION IS MKJE 
«AS BEEN RELOCATED CORRECTLY. 
LPUARD, THE RELOCATED TEST PHAS^ 



THAT Tf€ pPCipi 
IF THE PROGRAM CANNOT 3£ RELCCA'E 

urwnny. *rx nti.w\,mK.w itsi rimat *S BYPASSED. IF AN ERROR CCCJ? 

WHILE ftELCCATINC THE PROGRAM BACK TO TH| LOWER HK. AN ERROR MESSAGE I 
. _ _ ^Qjjp^ RETRIES " 



TYPED AND THE PROGRAM HALTS. CQNTINUlNG THE 
DCUNUARD RELOCATION. DOkNUATO RELOCATION WILL 
IS SUCCESSFUL OR THE oROCRAfI IS RELOADED. 



BE ATTEMPTED UNTIL I 



7.fe POWER .fAlL 

THE PRCGRAM MAY 2E POWER FAILED WHEN Rur^ING. WHEN THE PCUES RE'wRN 
THE PROGRAM WILL CONTINUE IN SEQUENCE. 

CAUTION 

PROGRAM ACTION IS UNDEFINED IF THE 
PROGRAM IS RELOCATED OR IN MOS MEMORY. 

00 NOT TURN POWER OFF /ON UNTIL THE 
MESSAGE 'POWER FAIlED' HAS BEEN TYPED. 
THIS IS BECAUSE THE STACK MAY O'k'ERFLOW. 



7.7 EXECUTION TIME 



F02 



t"3 CMCjTiai TIM !S oefenocn: on T.PE pr:;e35£p. ' ?e ;f -^-cs-. i*-: 



i 
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MISCELLAfCOJS 

AnO'JN"' OF nEMCR^. 5Cf€ REPRESENT A' I .'E TI^Es .F£B Fh£5 h-£: 
11 CS UITH cBV MEMCPi - : 

i: 45 wrn %k «Er!:R"» - 3 rv». 
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s53 PRCiRflfl DESCRIPTION 

sit 

• m^m 
«« w 

£% 

Els CHAPTER 9 



f WW 

7^4 
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PPCGRfiM DESCRIPTION 



THE PROGRAM VERIFIES EACH ADDRESS BY WRITING THE VALUE OF EACH ADDRESS 
TZS INTO ITSELF STARTING AT LOCATION 20000 AND ENDING AT THE LAST LCCATICN 

rSfc IN MEMORY. THE VALUE OF THE LAST LOCATION +2 IS TYPED ON THE TTY. 

72? NEXT THE VALUES WRITTEN ARE VERIFIED. TO COMPLETE THE ADDRESS TEST 

7:8 THE COMPLEMENT VALUE OF EACH MEMORY ADDRESS IS WRITTEN STARTING AT THE 

7:1 LAST MEMORY ADDRESS AND ENDING AT ADDRESS 20000. THE WRITTEN 

7:: COMPLEMENT VALUES ARE THEN VERIFIED. THE NEXT PHASE OF TESTING 

11 INCLUDES READING. WRITING AND CHECKING MEMORY USING SEVERAL WORST CASE 

= NOISE TEST PATTEftNS (1 XOR 8, 3 XOR 9. AND 9 XOR 13). A SUBTEST IS 

.3 DEDICATED TO CHECKING EACH PATTERN. THE TEST PROCEEDS BY EXERCISING 

m EACH BANK OF MEMORY USING THE TEST PATTERNS NOTED ABOVE. NOTE THAT 

:5 WITH THE MEMORY MANAGEMENT OPTION INSTALLED THAT ALL ADDRESSES ARE 

Is WRITTEN. READ AND CHECKED WITH THE MEMORY MANAGEMENT ENABLED. AFTER 

17 ALL MEm6ry from 20000 TO THE LAST ADDRESS HAS BEEN TESTED. THE PRCGRAf^ 

IS • RELOCATES TO THE NEXT 4K MEMORY BANK AND TESTS LOCATIONS Q-1^77b 

:5 USING (1 XOR 8). THE PROGRAM THEN RELOCATES TO 40000 (100023 IF 

=: AVAILABLE) AND CHECKS MEMORY USING 3 XOR 9, AND B XCR 13 TES^ 

2: PATTERN. THE PROGRAM THEN CHECKS MEMORY LSING RANDOM DATA .RANTS^.. 

U THIS ROUTINE MOVES THE PROGRAM CODE THROUGHOUT MEMORY STARTING A' 

=3 LOCATION 20000^ AND RELOCATES THE DATA BY A 32(DECIMAL) WORD OFFSET CN 

=- EACH SUBSEQUENt RELOCATION. I.E. . FIRST RELOCATION IS TO 2002Q. NE^T 

IS TO 20100, THEN 20200, ETC. AFTER RELOCATION THE CODE MOVEC 15 
CHECKED AGAINST THE ORIGINAL CODE (0-1777fe). WHEN THE RANDOM :ATA 
TEST IS COMPLETE THE PROGRAM THEN SUCCESSIVELY ROTATES A '0' BIT 
(ROTO) AND A '1* BIT (ROTl) THROUGH ALL OF MEMORY. WHEN ALL TESTING 




TESTS. 
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Til 

751 
7|3 

756 

Tsr 

759 

759 

76: 

763 
764 
765 
IH 

-6S 
769 



773 
77W 

775 
77t 

772 

779 

75C 

791 

70= 

7s3 

75'» 

7BS 

"96 

797 

-E9 
709 

792 
791 
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PDP-11 0-124K MEMORY EXERCISER 
PROGRAM DESCRIPTION 



=A-iE 13 



THIS PROGRAM IS PROVIDED TO ALLOW THE L3ER TO SPECI^ C CEF'AI'^ 
PARAMETERS AS 5H0UN BELOM: 

1. ENABLE/DISABLE PARITY ERROR INTERRLP'S 
. „ . i . 5TftBTjt<c. PdNlf NliMRER FOR TFST . 

3. NUMBER OF 4K BANKS TO TEST 

4. PATTERN TO BE USED 



n:te 

all inputs are i'.i cc'al, 



3.1.1 PROGRAM 2 USER PARAMETERS 



1. ENABLE PARITY' 
PARITY ERROR. 



I'C = YES^NO. TYPE 1 TC ENABLE INTERRLP' 
TYPE 0 TO DISABLE INTERRUPT. 



STARTING BANK liB)' TYPE THE 4K BANK WHERE YOJ WISH TO BEGIN 
TESTING. 



TYPE 

0 
1 

t 

-5 

w 

4 
6 

IC 

li 
• 5 

I 

14 
IS 
16 



TC START AT 

OOOOOQ 
02000G 
0400C0 
ObOOCQ 
10003C 
120000 
1420CC 
IbCOCO 

20000c 

220000 
240000 
260000 
300000 
320000 
340000 
360000 



TYPE 



20 

22 
23 
24 
2= 
26 

— 

33 
31 
32 
33 
34 
35 
36 



TO START A' 



400000 
4200CC 
440000 
460000 
5Q00Q0 
520000 
540000 
560C00 
600002 
620000 
540000 
66000Q 
70C0CC 
7200C0 

■ w www 



NOTE 

^YPE ONLY NUMBERS SHCUNI!! 



INUMBER OF 4K BANKS TO TEST CSi" 'YPE IN OCTAL THE NUMBER CF 
4K BANKS TO 'EST. 



4. PATTERN W 
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7YFE 



TO EELEC7 
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7qr PCP-U 0-i24K MEMORY EXERCISER 

-98 PROGRftfl DESCRIPTION 

799 

inT 0 1 XOR 8 TEST PPTTERN 

§55 i 3 XOR q TEST PATTERN 

S23 2 8 XOR 13 TEST PATTERN 

ICH 3 USER CONSTANT 

o:c 4 ROTATING 0 

gnt 5 ROTATING 1 

1^7 b 3 XOR 9 PfiRITi' PftTfERN 

ics 7 0.1,2.4.5 ABOVE 

SlI NOTE 

□13 PROGRAM UILL NOT ALLOU AN COD NUMBER OF 

4K BANKS TO BE TESTED IF PATTERN 2 OR 7 

915 IS SELECTED. IF PATTERN 13 IS SELECTED 

%'X THE PROGRAM UILL REQUEST A CONSTANT. 

917 TYPE A b DIGIT OCTAL NUMBER, TO ENTER fi 

lis NEW CONSTANT TYPE AN 'A' AND WAIT FOR 

§19 THE PROGRAM TO RESPOND. THE STARTING 

S2C ADDRESS IS 214. 
S21 
922 

IP S.1.2 PROGRAM 2 USE 

S2fc PROGRAM 2 CAN BE EFFECTIVELY USED ^C MAKE PROPER ADJUSTMENTS TO A 

air SPECIFIC memory bank and also to -margin- memory, this is so because 

lie the program is not running in the memory bankjs) being 

929 adjusted/margined. THUS ALL MEMORY FROM 0-124K MAY BE 

930 ADJUSTED/MARGINED. PARITY SHOULD BE DESELECTED UHEN MAKING ANY 
§31 ADJUSTMENTS PARTICULARLY WHEN TESTING THE FIRST 4K BflNK£S5. 

832 
933 
634 

S35 8.C PROGRAM 3 

937 THIS PROGRAM IS THE SAME AS PROGRAM 2 WITH THE FOLLOWING EXCEPTIONS: 
635 

939 1. INSTEAD OF NUMBER OF 4K BANKS TO TEST. TYPE NUMBER vF 

§42 25b ( DECIMAL). 400 (OCTAL) WORD BLOCKS TO TEST. 

54 1 

942 2. DO NOT SELECT PATTERN 2 OR 7. 

B44 THE STARTING ADDRESS IS 220. 

e4fc 

' 247 

(649 8.3 PROGRAM 4 
I 04a 

95; PROGRAM 4 CAN BE USED TC URITE/READ,USER DEFINED DATA INTO ANY SINGLE 

Sr ADDRESS- THE PROGRAM UFITE5 THE DATA AND CHECKS IT. 
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THE PROGRrtfl UILL REQUEST AN 18 BIT flOORESE fiNO IF SWITCH C = ft Ifc 
BIT CCNSTflNT (DflTfi). If SWITCH 0 s 1 THE PPZQUftV. UiLL *!F£ 



TEST CZJnS-G 0-:£-4k riEKCSV 

DZisriBa.Pii 

955 
S5b 
857 
S5S 

361 
S&2 
863 
964 
865 
866 
367 
868 
869 
870 
971 
872 
873 
874 
975 
876 
877 
978 
879 

9ej 

SSI 
882 
883 
584 
985 
886 
887 
898 
889 
89C 
391 
892 
893 
894 
895 
896 
897 
999 
999 
900 
901 
902 
903 
904 
905 
9Cb 
907 
908 
909 
910 
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CONTENTS OF SEQL'ENTIflL ADDRESSES UNTIL EITHER SWITCH 0 = 0 OR h f<Ei4 
ADDRESS IS ENTERED. 

TO ENTER A NEW ADDRESS AND CONSTAN^ TYPE AM 'A' AND UAIT FOR 'HE 
PROGRAM TO RESPOND. 

THE STARTING ADDRESS IS 224. 



5.4 PROGRAM 5 

PROGRAM 5 IS A TOGGLE IN MEMORY ADDRESS TEST. THIS TEST IS LSEFUL 
.4HEN AN ADDRESS SELECTION FAILURE IS SUSPECTED INVOLVING THE FIRST 4K 
OF MEMORY. THIS PROGRAM WRITES THE VALUE OF EACH ADDRESS INTO ITSELF 
STARTING WITH THE LOWER LIMIT AND CONTINUING TO THE UPPER LIMIT. 
AFTER ALL ADDRESSES HAVE BEEN WRITTEN EACH ADDRESS IS CHECKED FOR THE 
CORRECT CONTENTS STARTING WITH THE UPPER LIMIT AND CONTINUING TO THE 
LOWER LIMIT. 



LOCATION CONTENTS 



MNEMONIC COMMENT 



10 
12 
14 

16 
20 
22 
24 
26 
30 

32 
34 
36 
40 
42 
44 
46 



012700 
000050 
OlOOOi 
020037 
177570 
001403 
010010 
005720 
000772 

010004 
020001 
001767 
024000 
001774 
000000 
000772 



MOV «50.RQ 

MOV RO.Rl 
II: CMP R0,2«SWR 

BEG SS 
MOV RO^(RQ) 
T5T (R6)+ 
BR IS 

2J: MOV Ra,R4 
3J: CMP R0,R1 

SEQ IS 

CMP -(RO).RO 

BEQ 3S 

HALT 

BP 3J 



GET FIRST ADDRESS 

TO TEST 

SAVE IN Rl 

CHECK UPPER LIMIT 

(IN SWITCH REGISTER) 

BRANCH IF AT UPPER LIMIT 

LOAD VALUE INTO ADDRESS 

STEP TO NEXT ADDRESS 

LOOP UNTIL DONE 

SAVE UPPER LIMIT 

CHECK IF AT .OUER ^IMIT 

BRANCH IF DONE 

CHECK DATA WRITTEN 

BRANCH IF OK 

ERROR 

LOOP BACK 



AFTER TOGGLING THE PROGRAM LA=10 **SET UPPER LIMIT**. START. 



NOTE 



THE UPPER LIMIT ADDRESS OBTAINED FROM 
THE SWITCH REGISTER MAY BE CHANGED 
DURING PROGRAM OPERATION. HOWEVER. 
OCCASIONALLY THE PROGRAM MAY HALT 
BECAUSE OF 'SWITCH BOUNCE*. aHE BEST 
PROCEDURE WHEN CHANGING LIMITS IS TO 
STOP THE PROGRAM MAKE THE CHANGE AND 




t 



I 
I 
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3.5 PROGRAM & 



PROGRAM & IS ALSO A 10(i(iLZ IH PRDGRAM TC 3£ -SED Ul'H FRCGPh?! 5 rCR 
r^ORE C01PLETE ADDRESS TESTING. THIS PROGRAM WRITES TmE CC^tSrET 
VALUE OF EACH ADDRESS INTO ITSELF STARTING UlTH THE :PPi9 LIT h'.C 
CONTINUING TC THE LOWER LIMIT. AFTER AlL ACCFESSEs "A'.E 3E£> ^F:"£-. 
EACH ADDRESS IS CHECKED FOR THE CORRECT CONTENTS STARTING WITH 
^OXR LIMIT ADDRESS AND CONTINUING TO THE jPPER ^IMIT, 'CGG-E I'l 
FCOUING PATCHES TC PROGRAM 5 ABO'.E. 



St- 
51 • 



LOCATION CONTEN'S 



MNEMONIC COMMENT 



5C 
53 
54 
5e 
o3 
&S 
b-i 
&& 



100 
001404 
010402 
005142 
020201 
001375 
020204 
001755 

ciii§i 

320322 
001 "72 



BEO 4i 
4i: MOV R4.R2 
si: COM -vte) 

CMP R2.Ri 

BNE 5i 
SsS: CMP fi2,R4 

3E0 IS 

MOV R2.R3 

COM R3 

CMP fi3..B2' 

SEC sS 



CHANGE LOWER ;.IMr 
BRANCH TO PROGRAM e 
GET UPPER LIMIT 
COMPLEMENT ADDRESS 
CHECK IF AT LOWER LirT' 
LOOP UNTIL DONE 
CHECK IF AT UPPER LIMIT 
GO TO PROGRAM 5 IF Or.'iE 
GET VALUE OF ACCRESS 
COMPLEMENT VALUE 
CHE:k ADDRESS 

SRA'CH 

ER5CS 
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CHAPTER 9 
•pRPNCh i:9BLE nCS TEST 



9.1 ABSTRACT 




=.= OPERATING PROCEDURE 

1. LOADING: LOAD THE DZCMSG PROGRAM INTO fSPlORY «5ING 
ABSOLUTE LOADERS. 

2. STARTING: LOAD ADDRESS S?Z AND PRESS THE START BJTTCN. 
2. THE PROGRAM MILL FIRS" IDENTIFY ITSELF CN TTY: 

BRANCH GOBBLE 
H. THEN THE ABSOLUTE LOADER wiLL 3E SAVED. 

5. A CHECK WILL BE HADE FOP PARITY REGISTERS, IF NONE ARE "C-NC 
THE fCSSAGE: 

NO PARITY 

UILL BE TYPED TO THE USER. IF PARITY IS FCLK- IT IS TcRNE: 
CN. AND THE MESSAGE. 

PARITY ENABLED 

UILL BE TYPED TO THE JSER. THIS ^IL- BE FCuLCUED 3> A .1=: 

OF THE uNiBus addremEs cf THE 'wrv REGis'Ess «^:-n: an: 

ENABLED. 
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pcp-i: g-ishk npioRY exerciser =f.'*E =2 

BRANCH SCttLE nOS TEST 

IS 9E RUN 'JSING MEMORY MANA^Ef^f*^. 

!^ USE KTll^ ir OR N) 

-I 

• *» t 



IF THE USER TYPES Y T^fN MEMOS i MftNASEMEfi' wl' 3£ -=£1 

OURif? THE PEfOING tTsT. Jf «E tTpES N. rE^CP 

MANAGCTENT WILL NOT 9£ USED. TYPINS AN'-ThlNi LsE Z'Sr '-hN 
V CR N WILL CAUSE ThTouES'ICN TO BE REPEAtEC. 



■ 

*:!5 r. THE USER WILL THEN BE AS>.ED "^0 iI\E 'HE LIT: 

SPAN: 

:;:o h::h .imit* 

• ** • • 

:5l! l:j LIMIT' 

:5| crsTRIwTIONS ON THE jSER'S RESPONSE ARE: 

• -ra 



H. THE NUrfflERS MLS' 9E VALIS iS-Sr, s-rii- 
ACDRESSES. REAL NOT VIRTUAL. 



3. "^HE NUfSERS SHOULD BE MULTIPLES :F ICC .CC'Al:. 
ifll :. THE HIGH LIMIT MUST BE GREATER THAN THE ^Ck .irT'. 

::3S E. HIGH LIMIT CAr< BE 1 ♦ THE HIGHEST REAL CORE ADDRESS. F:«5 

1:4: VIOLATIONS TO THESE RESTRICTIONS «:Lw BE OCALT ^I'H IN '-I5 



:. if memory management i£ not jsed. high linr must % .e== 
Than cST equal to i&sco6. 

high limit car4 be : ♦ th| highest real core address. fc 
exahfle. in an 3k machine. high limit can eg-jal -^zzzz. 



mAi 

H. A QUESTION MARK AND P^OMF' ^I.. BE I55JE3: 



•-"'5 

?X " 

ISI a. WHAT EVER THE LAST TWO OCTAL DIGITS OF THE NJISER ^O. 

:g2 THE USER TYPED THEY WILL BE ASSEMBLED AS iTEROES. 

iSS C. THE USER WILL BE AS»^ED FOR OTHER LIMITS Sv REPEALING 'il = 

STEP v7:. BEFORE IS PE^EATE: 



THE USER I| -iff^ EXPEC'l.- 
THIS TIME CORRECTLY. 



TO INFwT THAT LI^T AGAIN; 
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brh.n:h :iOBBLE nos test 



:i2 WILL 3E ''^PEC. 

D. SAME AS 5. 

3. THE TEST STARTS. THE ^E£T UI_ .:0F rCEFIM'EwV 5t'..Et'' 

::i3 TWO LIMITS UNLESS 'HE USEP 'hE FRCSPmh CC. hn EPPIF := 

::s5 ENCOUNTERED. «iN ASTERISK 1= 'I'PES AT T^E EEil'ir'INi £fi> 

PASS MCDE. 

< •••« 

9, TO STOP THE TEST fi^NNlNi hNC S'mPT ANC'"ES HI" 'HE --.T 

::73 SUITCH AND RETuRN S'EF £. AN> TEST Bt' TfE FIRST wl.. 

INCLUDE STEP 4. 

:57£ :c. '0 stop the test and restore the loader, hit the halt 5wr>. 

::77 lOAD address its and S'ART. when 'HE LOADER IS RESTORED 'HE 

;C79 PROGRAM WILL HALT AT LOCATION 200. 

icaC ii. TO STOP THE TEST AND START THE 0-124K MEMORY '££' hi' '-E 

ICSI HAlT switch, load address 200, AND START. 

1533 12. DATA LIGHTS. THE DATA LIGHTS UILL DISPLAY THE OiJRSENT 

::84 LOCATION BEING TESTED DURING A BRANCH GOBBLE TEST. kHEN A 

iCeS MOS MEMORY FAILURE OCCURS THESE uIGhTS UIlL OON'AIN vIRTLAL 

izh (:6-BIT) ADDRESS "NEAR" THE FAIlJRE. 

1087 

1CS8 

'089 

1290 ^.3 ERRORS 
inqt 

1392 1. ERRORS IN OPERATING T^-E PROGRAM APE DESCRIBED IN OPERATING 

1293 cpocEDURE 9.2. 

13^ 2. IF A PARITY ERROR IS DETEI'EC ^HE u=ER IS TOLD THE ?>z A' 

1296 'HET IME OF THE ERRCR: 

:C97 

iD99 PARITY ERROR 

1099 PC=XXXXXX 
1102 

lie: THEN THE SCAN IS MADE TupOuGH AuL OF ^t.lORY T: 'Rv t: f:r:E 

tins THE ERROR TO ARISE AGAIN. IF IT IS NOT FOLNC 'HE ''E55AGE 

li2H SCAN COMPLETE 

::Cb IS TYPED AND THE TEST IS RESTARTED. 

i;28 IF THE ERROR IS DETECTED ON THE SCAN ''HEN 'HE JSER IS GIvEN 

THE ADDRESS OF THE LOCATION CAUSING THE PARITY ERROR AND 'rtE 
11 CONTENTS OF THAT LOCATION: 

• « • ■ 

:;:| xxxxxx had bad data xxxxxx 

ll'i IF mem:r> management /.as off :.r:ng t^e scan -:r 'he ers:? 
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PDP-11 C-124K HEMORY EXERCISER ^hiE 
BRANCH GOBBLE nOS TEST 

I<T11 OFF 
IS TYPED. 

IF MEMORY MANAGEMENT UAS Ot^ DURING THE SCAN: 

" KT'll Ofi PAR=XXXXXX ' ' ' " 

IS TYPED. WHERE THE FAR ^PAGE ADDRESS REGISTERS GIVEN IS "HA"' 
PAR MHI4h SHOULD BE LSED IN RELOCATING THE VIRTUAL ACCRESs 
GIVEN FOR THE ERROR ONTO A REAL CORE ADDRESS. THE METhCC FCP 
THIS RELOCATION IS GIVEN IN THE NOTE BELOU. 

AFTER ANY PARITY IS ENCOUNTERED AND THE USER NOTIFIED. TrtE 
TEST WILL BE RESTARTED. 

3. WHENEVER THE BRANCH GOBBLE TEST BRINGS OUT AN ERROR IN MOS 
MEMORY IT MAY SURFACE AS A PARITY AND BE HANDLED AS DESCRIBED 
ABOVE. OTHERWISE THE ADDRESS (VIRTUAL IF MEMORY MANAGEMENT 
IS ON) IN THE DATA LIGHTS WIlL DESIGNATE THE VICINITY OF THE 
ERROR. IF MEMORY MANAGEMENT IS ON. RELOCATE THE ADDRESS IN 
THE DATA LIGHTS IN THE MANNER DESCftlBED IN THE NOTE SELOk. 

NOTE 

TO COMPUTE THE REAL ADDRESS CF AN 
ADDRESS RELOCATED BY MEMORY MANAGEMENT. 
ADD THE LOU ORDER 13-BITS OF THE VIRTUAL 
ADDRESS TO THE CORRESPONDING PAR 
SHIFTED, 6 BITS TO THE LEFT: 

VIRTUAL ADDRESS = G 30X XXX XXX XXX XXX 

PAR = YYY YYY YYY YYY 000 000 

REAL ADDRESS = 222 222 222 222 222 222 

TO DETERMINE WHICH PAR TO USE REMEMBER 
THAT ON KERNEL SPACE IS USED IN ANY TEST 
HERE. TAKE THE HIGH ORDER 3-BITS OF THE 
VIRTUAL ADDRESS AND USE THEM T: 
•DESIGNATE THE KIPAR TO USE. FOR 
INSTANCE. IF THE VIRTUAL ADDRESS IS 
031b76 USE KIPARl BECAUSE THE UPPER 3 
BITS OF THE VIRTUAL ADDRESS ARE 001=1. 

•4. IF AN ERROR CONDITION ARISES. EITHER AS A PARITY ERROR OR ONE 
NOT A APPARENT SUCH AS THE PROGRAM HALTS OR IT IS CLEAR FROM 
THE ADDRESS AND DISPLAY LIGHTS THAT THE PROGRAM IS NOT 
RUNNING ITS NORMAL COURSE. 'HE USER CAN ENTER CONSOLE MODE AN 
EXAMINE THE CONTENTS OF THE MEMORY LOCATIONS STARRING AT THE 
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riCORESS ,I.N^ THE DISPLAY REGISTER. THE CCNTSM'S OF THEEE 
LOCflTlONS SHOULD SE COMPflREO TO THE CONfEN^S lU 



TEST r:Qn3-a :-:2sk nErcs^ e\e«;: 

PZJflSi.Pll 

1175 

i:rs 

1177 

• I -a 

1 '-a 

• 1 

• to* 

t ' 03 

1:33 
::94 

USE 

:is& 
i:a7 
iiss 

< t an 

1191 

1132 

1133 

113H 

1135 

113& 
t to- 

• * « 

1139 
11=3 
lEDQ 
1501 
1=02 
1203 
12CM 
1205 
120& 
1207 
12C8 
1203 

12:: 

1211 

1313 

■> to * » 

1213 
12H 
1215 

i2:fe 

1217 
1218 
1213 
1220 
1221 
1222 
1223 
1224 
1225 
12S& 
1227 
1228 
1223 
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=:F-11 0-124K flEHORY EXERCISER 
ERi^NCH GOBBLE M05 TEST 
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LISTINGS) OF LO:hT:CNS 1522fc THROUGH 153C4 :wr" 

EXCEPTIOHS: 15232 IS JfiDE TERMINABLE AND 15304 SHCJ.D CC'^hI'I 

EITHER 15370 OR 35370;. IN THIS M"' THE USER SHOUlD SE A2^E 
^^^^ y^^Y u5Rds. 



TO DETERMINE WHICH BITS UERE 



IN WHAT 



3.4 CRoaRAM DESCRIPTION 

THIS VERSION OF THE BRANCH GOBBwE TEST IS TAKEN ALMOST DIRECTLY FR:.** 
THE D2QKA-A INSTRUCTION EXERCISER WHICH CONTAINED THE ORIGINAL BRANCH 
aOBBLE. WHAT HAS BEEN DONE HERE IS TO GIVE THAT TEST AN INTERFACE TO 
THE USER AND MEMORY MANAGEMENT FACILITIES. THESE ADDITIONS HAVE BEEN 
DONE IN A WAY WHICH ALLOWS THE TEST TO RUN AS IT DID IN ITS ORIGirWL 
FORM. DATA IS COLLECTED FROM THE LSER AND IF MEMORY MANAGEMENT IS 
NEEDED IT IS SET UP AND THAT TEST IS ALLOWED TO RUN SETi4EEN THE 
DESIGNATED LIMITS. 



.NLIST 
.LIST 
.ASS 
.MCALL 
•TITLE 
■SBTTL 



md.m: 

ME 

5TYPE 

TEST D2QMB-G 0-124K MEMORY EXERCISER 
STARTING INST J DEFINITIONS 



: COPYRIGHT 1373 DIGITAL EQUIPMENT CORP., MAYNARD.MASS. 

THIS TEST CHECKS THAT ALL MEMORY ADDRESSES ARE UNIQUE USING ADDRESS TESTS 
AND CHECKS DATA RELIABILITY OF MEMORY USING WORST CASE NOISE TEST PATTERN 
A RANDOM I PATTERN (PROGRAM CODE RELOCATED), A ROTATING 0 AND ROTATING 
1 PATTERN. 

ALSO INCLUDED ARE USER TESTS WHICH CAN BE USED TO TEST SPECIFIED SEG- 
MENTS OF MEMORY USING THE PATTERNS MENTIONED ABOVE. ADDITIONALLY A 
28 WORD TOGGLE IN PROGRAM IS DOCUMENTED (SEC 3.5 OF THE DOCUMENT: WHICH 
CAN BE USED IF AN ADDRESSING MALFUNCTION IS SUSPECTED INVOLVING THE FIRST 
4K OF MEMORY. 

A MOS MEMORY TEST HAS BEEN ADDED, THE BRANCH GOBBLE ROUTINE. 
THE PROGRAM MAY BE POWER FAILED flHEN RUNNING. THE PROGRAM WILL PRINT 
P MESSEGE (POWER FAILED) AND CONTINUE IN SEQUENCE WHEN THE POWER COMES 
BACK UP. »*CAUTION#» DO NOT POWER FAIL THE PROGRAM IF THE PROGRAM IS IN 
MOS MEMORY OR IF THE PROGRAM IS RELOCATED. 

LOADING AND STARING INSTRUCTIONS 
LOAD ADDRESS 200 AND START 

NOTE: PROGRAM WILL RUN WORST CASE TEST PATTERNS IN LOWEST 4K 
THUS THE PROGRAM CANNOT BE RESTARTED AT 200 IF RELOCATED. TO PREVENT 
RELOCATION FROM OCCURING DEPOSIT 200 INTO LOCA'ION 42 (NOT NECESSARY 
IF LOADED VIA ACTll). THIS ACTION WILL PREVENT RELOCATION AND ALSO 

INHIBIT TESTING MEMORY IN LOWEST 4K. ^ ^t..^ 

THIS PROGRAM ALSO RELOCATES THE ABS AND BOOT LOADERS TO ALLOW TtsTINu 
OF MEMORY, TO RESTORE THE LOADERS RESTART AT lb2. 
STAcK POINTER IS SET AT 500 
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1331 
1232 
1233 
1234 
1235 
1236 
123" 

1239 

1240 
1241 

:2t2 

1243 
1244 
1245 
124b 
1247 
1248 
1249 
1250 
1251 
1252 
12S3 
1254 
1255 
125& 
1257 
1256 
1259 
12bC 
12bl 
12b2 
12b3 
12b4 
12b5 
12bb 
12fc7 
12b8 
12b9 
1270 
1271 
1272 
1273 
1274 
1275 
127b 
1277 
1279 
1279 
1280 
1281 
12B2 
1283 
1284 
1285 



OOOCGC 

:030Ci 

000002 
000003 

300QC4 
000005 
CCOOOb 
300007 
000000 
000001 
000002 
000003 
0000C4 
000005 



OOOOCi 
0C0002 
000004 

D>''ooia 

0D'.j20 
C 1340 
00l;00 
OOOOOO 
040000 
140000 
OOOOOO 
01 0000 
030000 
004003 



000004 
QOODIO 
000014 
000014 
000014 
000020 
000024 
000030 
000034 
OOOObO 
000054 
000240 
000244 
CQ025Q 



17777b 
177774 
177772 
177773 



AN ASTERISK WILL BE PRIMTEL Cii COMPLETIOU OF Efi> 
THE PROGRAfI NflME MILL BE PRINTED UHEN TEST 13 C:ilP-E^5 



: GENERAL REGISTER ASSIGNMENTS 
RO=v.O 
Rl=v.l 

R2=X2 
R3=".3 
R4=:<4 
R5=:'.5 
SP='/.b 

PC=-;7 

R10=>:0 
Ril=xi 
R12=>.2 
Ri3=-/.3 
R14SV.4 

R15=X5 



;STATUS REGISTER ^PSUj Br 
C=l 
V=2 
Z=4 
N=10 
T=20 

PRTY7=340 

PRTY4=200 

Kn=OO0O0C 

Sf1=040000 

UM= 140000 

PKMrOOOOOO 

PSf1=OlOOOO 

PUri:0300Q0 

REG=004000 



ASSIGNMENTS 
C BIT 



4 



BIT 
c BIT 
N BIT 
'T' BIT 

PRIORITY LEVEL 
PRIORITY LEVEL 
KERNEL MODE 
SUPERVISORY MODE 
USER MODE 

PREVIOUS KERNEL MODE 
PREVIOUS SUPERVISORY mcdE 

, PREVIOUS USER MODE 

; SELECT R10-Ri5 



: VECTOR ADDRESSES 
ERRVEC=4 
RESVEC=10 
TBITVEC=14 
TRTVEC=14 

3PTVEC=14 

I0TVEC=20 

PFVEC=24 

EMTVEC=30 

TRAPVEC=34 

TKVEC=bO 

TPVEC=b4 

PIRVEC=240 

FPEVEC=244 

MMVEC=25Q 

: REGISTER ADDRESSES 
PSW=1 7777b 
SLR=1 77774 
PU.Q=177772 
UBREAKr 177770 



: ADDRESS OF ERROR VECTOR 

: ADDRESS OF RESERVED INST. TRAP VECTOR 

; ADDRESS OF 'T* BIT TRAP VECTOR 

! ADDRESS OF 'TRACE' TRAP VECTOR 
: ADDRESS OF 'BREAKPOINT' TRAP VECTOR 

: ADDRESS OF lOT TRAP VECTOR 

; ADDRESS OF POWER FAIL TRAP VECTOR 

: ADDRESS OF EMT VECTOR 

; ADDRESS OF TRAP VECTOR 

; ADDRESS OF TTY KEYBOARD INTERRUPT VECTOR 

; ADDRESS OF TTY PRINTER INTERRUPT VECTOR 

: ADDRESS OF PIRQ VECTOR 

; ADDRESS OF FLOATING POINT INT. VECTOR 

: ADDRESS OF MEM MGMT ERROR TRAP VECTOR 



ADDRESS OF STATUS REGISTER 
ADDRESS OF STACK LIMIT REGISTER 
ADDRESS OF PROGRAM INTERRUPT REQUEST 
ADDRESS OF MICRO BREAK REGISTER 
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1296 

1237 

123S 

1299 

129C 

1291 

1292 

1293 

1294 

1295 

1296 

1297 

1298 

1299 

1300 

1331 

1302 

1303 

130H 

1305 

1306 

1307 

1308 

1309 

1310 

1311 

1312 

1313 

1314 

1315 

1316 

1317 

1318 

1319 

1320 

1321 

1322 

1323 

1324 

1325 

1326 

1327 

1328 

1329 

1330 

1331 

1332 

1333 

1334 

1335 

1336 

1337 

1338 

1339 

13H0 

1341 



177560 
i775§^ 
177564 
177566 
177570 
177570 



C005CC 



300100 
040000 
020000 
010000 
001000 
000400 
000100 



r75:2 

177574 
177576 
172516 

172300 
172302 
172304 
172306 
172310 
172312 
172314 
172316 

172340 
172342 
172344 
172346 
172350 
172352 
172354 
172356 



104400 
104000 



000006 
OOQCOO 



TKS=177563 
TKB= 177562 
TPS=1775b4 
TPB= 177566 
CUR=i 77570 
DISPLfiY=1775'0 

: INITIAL STACK POINTrR SETTING 
STKPTRrSOO 

: MISCELLANEOUS BTT ASSIGN1ENTS 

BIT15= 100 

BIT14= 040000 

BIT13= 020000 

BIT1€= 010000 

BIT9= 001000 

BIT8= 000400 

BIT6= 000100 

; MEMORY MANAGEMENT REGISTER ADDRESS ASSIGNMENTS 



ADDRESS CF KEYBOARD CSR 
ADDRESS OF KEYBOARD BUFFER 
ADDRESS OF TELEPRINTER CSR 
ADDRESS OF TELEPRINTER BUFFER 
ADDRESS OF CONSOL SWITCH REGISTER 
ADDRESS CF CONSCL DISPLAY REGI=^E=? 



SR0=177572 
SRi=177574 
SR2=177576 
SR3=172516 



; ADDRESS OF MEM MGMT REGISTER SRO 



KIPDRO: 
KIrDRl= 
KIPDR2= 
KIPDR3: 
KIPDR4: 
KIPDR5: 
KIPDR6: 
KIPDR7= 

KIPARO: 
KIPARl: 
KIPAR2= 
KIPAR3: 
KIPflR4: 
KIPAR5: 
KIPAR6= 
KIPAR7: 



172300 
172302 
172304 
172306 
172310 
172312 
172314 
172316 

172340 
172342 
172344 
172346 
172350 
172352 
172354 
172356 



; ADDRESS OF MEM MGMT REGISTER SP3 

: ADDRESS OF KERNEL T PAGE 
; DESCRIPTOR REGISTERS 



SPl 
5R2 



; ADDRESSES OD KERNEL T SPACE 
•PAGE ADRESS REGIS^'ERS 



: INSTRUCTION EQUATES 
HLT=TRAP 
SCOPE=EMT 



:MISC. 



EQUATES 
RU=6 
UP=0 



: SCOPE IS AN EMT TRAP 



:R'W BIT IN PDR REGISTERS 
:UP BIT IN PDR REGISTERS 



5C * 
rs- 



III! 



• ITT 



* 

•IB' 

1288 

•ISO 

125: 
:2'3: 

1252 



X5XXX, 



•in- ! 7t 



xxs^ss 



216716 
C05237 

000162 

circ6 

0:-»767 
K-767 
0D2Q30 
:i27:6 

::-767 



•7nfc 



2:w.c- 



177722 
001726 



•••• • M 

re- - 



•0* 



:1?^ 



aiTi- 



IT" 



^fivPC2* Wi 

'•HE jjWCuTIfC UHESE Is CflL.EO SE^CRE ANY TEST IS R-N T: SEE 
IF BRANCH iOMLE RELOCATEO T»€ ENTIRE FIRST FCl;R K OF CORE 
'HE SECOND FOR K AND DIDN'T RELOCATE EVERl THING BACK. IF THIS IS 
•f€ CASE THE WHERE UILL Rl'T THE PROGRAM BACt( INTO THE FIRST FCLF r 
Arc RETURN TO THE BESINNING OF THE TEST THE USER DESIGTWTED 
BY LOAOlNfi HIS STARTING ADDRESS. NOTE THST 'HIS ROUTINE MIL. NOT 
RELOCATE 'hToROGRAH IF IT HAS BEEN flOVED BY ANY OTHER SUBPRCGFA" 
EXCEPT THE |Rflr-:H 30B8LE PRCGRAfl. THE RELOCA^ICN OF THE PRCGRA1 
TC TH| FIRST FOUR K IS INACTED BY THE JSER IN 'HE SAHE UfiY IT w.h= 
:u Tj€ DZQfeF AND DZOffflE VERSIONS OF THE 0-12-* TES'. IF IT HAS 2EE 
RE;.OCATED BY THE PART CF THIS TEST ^-ICH UfiS TAKE.n CZi-B. 'h^t 
IS ALL THIS PRCGRAH EXCEF' SRANCH GOSB-E. 



JHEPE: 



1ST 
9KI 
RTS 
flOV 
JSR 
.UORO 
.UORC 
»10V 
vLR 
RTS 



31120 
li 

PC 

iSP! 

r|.ri 

sAv't :2.(5Pi 

Stl£3 

PC 



SA'/FC2*2c::: 

L0C*2C0C2 



PCr€: 



PT^wi 



.=162 

nov 

JSR 
JSR • 
HALT 

rev isoo.bP :STmFting adcpess cf :-i2hn ^e^cr- £\£r::5S 

JSR PC.wHEFE 



•500. SP rS'AR^lNG ADDRESS t: RE^CCA^E -ORDERS. 

PC. U4ERE 

PC.SRlCR 



'££• :::.r=-; :-:2tN .*s^!:s> e\£«;::sep 



C04 



1393 
1395 

m 




:-r:2 

1423 

>sr 

■.sa 

:h3s 

1433 

:h3S 
:-3= 

>-r2 



CI0C33«* 
CCCjIG 
0023:2 
2CC314 

:::324 
:c:3=& 



CSC33H 
200338 
C0S3H3 



:£035D 

r— -scs 



rrncis 



.137 
J!270b 



0126S7 
0105% 
OlOHHfc 
2lC|4fc 

2I024fc 



3i2&67 
212c»22 

012&03 
0126CH 
C5C3H6 012605 



3 



2127C7 
-nnnr- 



::374& 

C247fc7 
0C5737 



C137t6 
0137% 
212730 



0S%30 

i!^g5 

305706 



177640 
C0574C 
000500 
1775E4 
2l2134 



7 rrr", > t 



C2C752 
177=72 

«' ' S' s 

'72''-'" 



lAJii; =- -3£' i:-sEB-76 11:59 PhiE s= 

::n5 

P'rSEE; 

DC' 9. 



FCI-.E: 
FSI\: 



:iF 

M."' 

:sR 
ngv 
:np 

.=250 

.wore 

JSR 
JMP 
MOV 
JSP 
JMP 



SiSTAfiT :C0 TC START CF TES' 

g§OO^P^:S'ARTirfi ADORESS OF PfiC&RA'^ 12. 

sihfH ::0 START PRO(y^fir! l2 

•500, SF :5TART!Nt ACRESS OF PROGRAM 12. 

St^RGj :uO START PROGRAM l3 

0 J MEMORY MANAGEMENT TRAP VECT:*. 

0 

■500. 5P : START ADDRESS OF opoSRA" ■4. 

PC.UHERE 

ai^RG4 

■500, sf : starting address of bran> ;;3s-£ rzl 
pc.uAere 

BRANCH 



:R:.J^INE to save registers oh 'HE STACK 
: CALLED 9Y SAVE MACRO OF. JSR PO.lSHyF 



iSAvR: 



IS: 



MOV 
MOV 
MC/ 
MCV 
•<0v 

'no\ 

MC^' 
MOV 
0 



oP) + .lS 

>.5.-(SP' 
•'.4,-.SP) 
■.3.-.SP^ 
'.2.-.SP- 
cp- 



:£AvE RETURN K 



•1 



•.O.-.SF. 

£Pi;*.p: 



:RETJRN 

: CONTAINS SE'JRN AODPESS 



BCu'TINE TO RESTORE RE^Ii'ECS ShvEC ON THE S'ACK 
CALLED S^> PIS'ORE MACRO CF JS» 



ifiESTR: MOV 

MOV 



MCV 
MOV 

MV^» • 
•V • 

M* ' 
« 

MOv 
MOV 



(SP>+,:i 
:sp 

vSP>.M 
.5P>.-.2 

•:sP>.--.5 
:5P'*.-.4 



FvMRESTR 
:SAVE RETJRN PC 



:RE'--RN 

: CONTAINS R£'-R*' AIDRESS 



.SBTTL 
.s5C2 
POwER FAIL ROUTirC 



POWER FAIL RCU'INE 



'rE PCUER DOUr< ROUTINE SAVES 'HE f^EYSOARD STATUS. THE GtSERA^ REOIS 
::«'C-R5)7j5ND MEM MGMT REGISTERS (KlPDR0-KlPDR7.kI^ARC-kIFAR7.5R2.5R 
ICN THE *TACn AfC SAVES THE STACK POINTER IN PFSTK^BELCJ. 
i:-N: MCV 2^TKS.-iSP :SAVE kEYBOARD^STATUS ^ 



JSR 

TST 
3EG 
MC 

ro: 



PCSSAvR :G0 SAVE REGISTERS CN THE S'^ACK 

S«ftMAVA : CHECK IF MEM MGMT IS A.'AILABlE 

31 : BRANCH IF NO' A'»AIlA3»E 

a«5R0.-.5P'' :SAVE SRC 

J^SRc.- SP :SAVE SR2 

■KlPrftO.FO :iET ACCRESS OF kI^DRO 
fS..R2 



D04 

s 11:59 PAiE 



w ^ «< w I w 

-1 — E^r 
20C5S2 



312*38 



.v3Cc 



"33 

•iSS 

Hfei 

tt3 
•toH 
-JbS 
4£ib 
^67 

1": 

H-'l 

•475 
H7b 
4''7 
•478 

•»7g 

•433 
-JSl 
•432 
■fSS 
•4S4 
435 
HSb 
-t97 
49S 
•499 
-9C 

492 
493 
-r94 
495 
496 
-97 
499 
•♦99 
50C 

154 
5:5 

5:7 

2:9 c:5754 ocacco 



000572 
CC057M 

wwO&wO 

0006CH 

::cf>06 
020S12 

OQO&lb 

000&20 

QCCb22 

0CC&2H 

00^ 

000632 

Mgfc34 

30X40 

20064M 

000&5C 
nnotcp 

000656 
000656 
300662 
000666 
000674 
000676 
000700 
C0C704 
000706 
C00712 
000714 
000716 

000720 
0CC726 
000734 



003742 
000744 
00C746 
QQ075C 
XC7S2 



X0240 
013706 
005767 
M1417 
012700 
012702 
010203 
C1264C 
077302 
012700 
012640 
077202 
012637 
012637 
00S767 
001402 
004767 

004767 
012637 
012737 
005027 
000000 
005267 
100375 
004567 
0CC72C 
000240 
000002 



•SI* 



172360 
0000 10 



177572 
006144 

C06066 

17744s 
17756C 
000502 



177772 
000046 



OQOOCO 
^OCO 



005015 047520 042527 
020122 040506 0461 i: 
042105 005015 OCC 



000742 
000000 

coooco 

000000 



21: 



3S: 



1QV 

3oe 

?10V 

flOv 

3:8 
rov 

HflLT 



R2.R3 

ikI^Sro.po 

R3.2f 

0 

■FwF. 2aFf VEC 



& e 



NOP 

MOV 



!^E. 



2i: 

4S: 
5S: 



iOi: 
US: 



6i: 



SE^ 

^ov 

MOV 
rtOv 
SOB 
NOV 
MOV 
SOB 
MOV 
MCV 
TST 
BEG 
JSR 

J5R 
MOV 
MOV 

:lr 

.UCRO 
INC 
9PL 
JSR 

PURFAIL 
NOP 
RTI 



aiPFSTk.SP 

MMfivA 

4S 

iKlPPR7*2.fiO 

tS..R2 

R2.ft3 

'.SP)*.-(RD) 
R3.1S 

•KtP0R7*2.R0 

iSP5*,-(R0i 

R2.2I 

:s^)>.atiR2 
■:sP)*.atSRC 

PARAVA 
5S 

PC.MAMF 

PC.SRESTR 

CSP)-»-,atTK5 

•PDWN.2IPFVEC 

(PC)* 
0 

lOS 

lit 

R5.5PRIN' 



'.SAVE kIPCR0-KIPDR7 

:(;ET ADDRESS OF KIPARC 
:SAVE KXPAR0-KXPAR7 

:5A*;E STACK PTR IN FOLLOUIMl LSCATi:*. 
; CONTAINS STACK PTR AFTER POWER FAI^ 
SET POWER FAIL VECTOR TO PUP ^CLTINE 



:5ET STACK PTR 

: CHECK IF MEM MiMT IS hVmILABlE 
:G£T ADDRESS OF KIPAR7+2 

: RESTORE KIPAR7-KIFARC 

;5ET ADDRESS OF KIFDR7+2 
•RESTORE KIP0R7-KlPDRa 

SR2 
SRO 

i CHECK IF PARITY REGISTERS APE ENASL: 

: BRANCH IF NOT 

:iO ENABLE PARITY REGISTERS 

: RESTORE REGISTERS FROM STACK 

:SE'' POWER FAIL TRAP TC PDUN RC'J'INE 

:DE-A: UAITING FOR TT^ MOTOR 
:GC TO PRINT ROUTINE 



: RETURN 

527 PUSFhIL:.ASCIZ . 15" 12) 'POWER FAILED* i5> v 12" 



ICNT: 
I COUNT: 
ERCNT: 
LDDI5P: 
MMAVA: 

OELOCF: 
:;jNT: 



.5BTTL 

.EVEN 

.WORD 

.WORD 

0 

0 

Q 

.WORD 
.iJCRD 



TAGS S PRINT ROLTINE 



3 
0 



iCONTAINS PASS COUNT 
CONTAINS ITERATION PATTERN 
CONTAINS ERROR COm 
CONTAINS DISPLAY REGISTER IMAGE 
MEM MGHT AVAILABLE INDICATOR 
QrNOT AVAIL, -1=AVAIL 
CONTAINS RELOCATION FACTOR 
'EMPCRARY WORKING ^CACA'ICN 



D* • 



L£1^ £\£c;:££F "4: 



E04 



'5' ' 

•C- 3 

* W * to 

'5'3 

:§:5 

!?;3 
:5i: 

15=4 

•C3C 

•cr* 
1528 



1531 
1532 

:53M 

1535 
1=35 
1537 
1538 
1539 

:=•+: 
:5h: 

1542 

1543 

1544 

1545 

1545 

1547 

1549 

1549 

1552 

1551 

1552 

1553 

1554 

1555 

155fc 
•CC7 

'cee 

•ctr 

1551 
1552 
1553 
1554 



in 



QC1313 



201322 
221225 

321034 
321035 



177|54 
177|55 
21DC45 
217602 
052755 



0G1044 

201246 
S5l5S2 
221255 



ooi;;54 

QC1072 
001072 
301075 

K1114 



112346 
2C13C3 

3il55§ 

0OOC02 



0C4757 
122725 
001355 
216745 



125355 
002770 
004757 
003772 

105777 
100375 
115577 
000207 



www * w 

™5c 



17772-* 

COOOOe 
177710 



:«i:-T:'€ TC PASS lE5Sfii£ a::res: 
JSP RLh^I**' 



F£ C.«'!fiE 2E-:« 



ADC 

.WORD 
RT3 



<R5^*.:s 

PELwt.r , It 

PC.TVCE 

3 

R5 



:£T flEsSAuE ADDRESS 
CATI^ FACTCR 



ADD REL2C 
PLSH PSU 



StAC^ 



CfiLL TYPE ROUlfrl 
CCN'^AINS r€SSA&E AZLOESS 
RE'-RN 



RCw'INE TC T>PE ASCII -ESSAiE. riESSACE nUST TERMINATE UI'H ACS 
R-L'TIME WILL INSERT A NL'^ER OF NULL CHARACTERS AFTER A -I'^E 



:A^l: TIPE 



rESfiOR 



:!«SAOR IS FIRST ADDRESS :p ASCI: 



:TAiS -£E: 9Y 'HE 
In.l.: .3-'TE 3 

IT«Fui: 

r=9: 
.^■•FE: 



.BE FCw'INE 3EL0U 



li: 



-it' 



4i: 



5S: 



.BY^E 
.rfORC 

Ac: 

=•€ 
T5T 
.1CV 
R" 

vfPB 
3ME 



DECS 
9LT 

JSfi 
3R 

TSTB 
BPL 
riOVB 
RT5 



177=55 
PC.- sp- 
2= ap:.s: 

•5.2.3* 



- cc 



PC =i 
•l5.<'5F * 
IS 

JNJLw.-.=F 



IvSP 

3S 

PC, 51 
41 

2ITPS 
.-4 

2.SP5.3STPB 
PC 



CNTAINS NULL CHARACTER 
CONTAINS I OF FILLER CHARACTERS 
CONTAINS TELEPRINTER AVAILABLE - 
0 377 s AVAIL/NOT AVAIL 
CONTAINS KEYBOARD AVAILABLE FLAG 
ADg^p CF TL£PR2NT|R_S:^AIL'S_PEG 

SAVE R^ 

aET r«E5SAGE ADDRESS 
ADJUST RETURN P: 



OF TELEPRINTER 3ATA EL^F^ 



fLSH CHAfiACTER TO BE :>be: 
BRANCH IF NOT THE TEfiniNATCR 
P;P TERfllNATCR CHAR CFF >E 
RESTORE RO 
RETURN TO CALLER 

'YPE CHARACTER 

CHECK IF CHARACTER UA5 fi -INE FE 
BRANCH IF NOT LINE FEED 
;ET I CF FILLERS RECJiFEr m>2 FI 
CHARACTER. 

DECREMENT FILLERS REO. CCLNT 
BRANCH IF NO MORE FILLERS ARE '.E 
'YPE FILLER CHARACTER 



:UAIT FOR OUTPUT DEVICE 
::U'PJT CHARACTER 



:XXXXXXXXXXXXXXX\XXXXXXXXXXXKXXXX 
ERROR TRAP SERVICE ROUTINE 



SpRTRP: TST atSWR 
BPL .+4 

HALT 



CHECK IF HALT Q^A ERRCR 
BRANCH IF NO HALT ON ERRCR 
HAuT 



.z - : <l . 

. -.MS » C • • 



'-crc. 



FOH 

1 1 . CO 



• S' » 

157: 

1=72 

irs 
:=-& 
isr* 
:5'3 

'Ear 
•S3: 

* WW 1 

•COS 

1593 
:5S5 

:;3& 

1597 
1599 

*s3n 
1592 
'sac 

:l% 

1557 
1=?9 



laCE 



• ^ M W 

•i-0 



•t"5 
l£> 

iaib 

•i • a 



2**ll-e 
OOUHO 

cgii42 

001152 




ccoccc 



MW*** WWW**?' 



«#^* • « ■ 
301176 
0C120H 
CC12CS 
00121« 
001222 
GC122H 
uClc32 
CO12H0 

001254 
001256 
001260 
001266 
CC127C 

on 1 374 

001300 
001 30H 
001310 
001312 

001316 

rf ' -rsr 

OClOiM 
001330 
001334 
001336 
001342 

35i55C 
001352 
001356 
C0136Q 
001362 
001366 
:013b6 
0C1372 
001374 



34' 
016602 
004767 
004567 
001467 
004567 
002=75 
0166C2 
004767 
004567 
002253 
105767 
001017 

niK 

004567 
001473 
010046 
004767 

00'^»5b7 
C01506 

:i:34c 



0C03a6 




177010 

V w V w * 



1774i2 

300174 
l77-*2-» 

005157 



177402 
I773i6 



3' 

->ar 

ros 

JSR 
JSR 
TRAP4 
J3R 

d:git= 

ClR 



2f 

SP.IS 

Fc.jfdino 

R5. SPRINT 
R5.SPRIN'' 



IS 

ai200 



1775-2 



17757C 



•SBTTL ERRCR SERVirS 
:£Rfi:R SERVICE CALLED BY J5R 

::r hlt vA trap inst) 

feRRCR: NOP 

CfiP •17777, ER:nT 

ae2 4t 

•l.ERCHT 

few 

^xji^.stoisp 



4S: 



SS: 



"Ait -(£ 



>ECK IF PR£V TPfiP TC 4 

coriTfliNS ERROR refc^te: 

aRANCH IF liQT REPOPTE: 
SET -NOT REPORTED' 
iET PC OFF STflCK 
GO TO FORMAT ROUTIfiE 
iO TC PRINT ROUTINE 

iO TO PRIN' RCJTINE 

ERRCR! sec:nd trhp t: - 

BEFORE ciRS' Jm5 FRITE: 
RESTART AT 200 



PC. ERRCR INS'PLC' 



: CHECK FOR RAX EPs;5 

:INCREr€NT ERRCR CC-T 
:SWITCH q UP' 



;^DI£P :£h^'E RELCCATICN Bl'l 
miP :.jA: error CCL'N' 
StOISPwAY :i.OAD :I5=lh-. =£i:=-£= 



lOi: 



J5R 

RECDAT 

nov 



3S 

•20000.215^ 
IS 

PC,$5ftVR 
1-»!5F;.R2 
PC.SFOftRC 
R5. SPRINT 

R5. SPRINT 

4:Sc\R2 
PC. SFifif^O 
R5. SPRINT 

PENFLi 

lis 

PEFLi 
IDS 

R5.SFRIN' 

R0.-.5P: 
PC.02A 

R5.SPPIN' 
R3.-:SF- 



:HfiL' ON ERRCR 



:FR:nT out DESIRED" 
: BRANCH IF NO PRIN'-C-' 
:iO SAVE REGISTERS ON 
:iE: PC OF ERRCR Ch.. 
:V: '0 FORMAT RCUTINE 
:iC TC PRINT ROUTINE 



:GC T 



0 PRINT RCU"^INE 



:GET FAI.INi ADDRESS , 
:GC TC PORriAT RCL'INE 
:G0 '0 PRINT ROUTINE 



IN ^£ 



:3RANCH IF PARH', ERRCS DE'EC'E: 
:BUT NOT FOUND 

: BRANCH IF PARITY ERROR CETECTtO 
:BUT FOUND 

:G0 TO PRINT ROUTINE 

:PU5H VALUE TO T^PED ON^C STACK 
:GC PRINT VALUE 



;G0 TC PRINT ROUTINE 
:PuSH VA^-E 'C BE 



iPEO ON'C S'ACn 



Es?K:fi SERVICE »::tin£ 



ifc£4 

la =5 

:a2E 
•ta- 

1^29 
:&33 

:|34 

Is3E> 
:h3T 
:fe38 

:fc39 

•tan 

1643 
1644 

:=53 

lo54 
1659 

k k» ^ 
* WMta 

:fc64 

■ etc 

tttc 
'tta 

■ i.-'Z 



551451 

0C1406 

C01414 
001422 
CC:42H 
001430 
X1432 
001436 
001440 
021442 
001444 
2:i450 

20 1452 
OOlHbC 
0014E)& 
001467 
001473 
OCISCC 
C01S0& 
321514 



22:524 
221532 
001540 
221544 
20 1552 
201552 
::2155b 
301560 
201562 
021566 
001570 
001576 
001600 
201504 
001606 
02161: 
C0161S 
001614 
001616 
221622 
X16H 
321630 
001632 
221634 
22:640 
221642 
221644 
22'B-»6 



:::3i4 

17-352 



176714 
002020 



OOOCOc 



004567 
015020 
004767 
032737 
001403 
004567 177332 
001521 
0C5737 
1C0301 
XCOX 
0100H2 
062702 
0CQ0Q2 



251124 
020104 
040 
120 
107 
040504 
041040 
252101 

22 1524 

266767 
266767 
204767 
212704 
005023 
162702 
010205 
010501 
005767 
021426 
032737 
J1422 
I42701 
000301 
006001 
006001 
006001 
006001 
C17102 
012700 
006302 

0770C3 
042705 
062502 
00^503 
0C6322 
""Ik ' 



wSwiU. 

047524 

036503 
047517 
040524 
042101 



177224 
177216 
■ 7e-=4'' 

322=7= 
0C03C2 



177164 
230021 



22 1 ^ £6 
002226 



177572 



242522 
C32G4C 

000 
022124 
000075 
0«2240 

22C 



Hi: 

IS: 

2i: 
31: 



•3c 



JSR 

SCREF 

JSR 

BIT 

9EQ 

:sfl 

BELL 

TST 

BPL 

HALT 
MOV 
ADD 
RTI 



G04 



l2-£Eo-7s ll:5«9 



£ 46 



b:.02h 

R5. SPRINT 



oC.SRESTR 
i2£l00.5iS! 



ISUP 



RS. SPRINT 

SiSUR 
.♦4 

R0.-;R2i 
12. R2 



ERRPC: .AS:i; 

x?*tdhT: .asci; 



•SOOO DfiTAs- 



RECCAT: .ASCIZ ' BAD DATA:' 



BElL: 



<7> 



:s: 



add 

JSR 

no.- 
:lr 

SUB 

E 

sr 

m 

ROR 

RjR 
ROR 
RCR 

MCV 

r:v 

ASL 
ROL 

sea 
ai: 
add 
ad: 

ASL 

pcl 



RELOCF.llS+2 
REL3CF.4i$*2 

iDl5IT5.R4 

P3 

•2.R2 

re^Ri 

•irwvA 

IS 

il.a<SR2 
IS 

if I I < «n* 

Ri 
Pi 
Rl 
Rl 
Rl 

aPARTAB-: .P2 

•6.RC 

R2 

R3 

R2,.-4 

•i&2:ac.R5 

R5.R2 
R5 
R2 
P3 

•e.-2 



:50 TO PRINT RCJTIME 

: RESTORE REGISTERS FR:r 5'hi> 
:RING KLL ON ERROR 

J GO TC PRINT ROUTINE 



;HALT AFTER PRINT C'-T 



: RESTORE :ORREC: 



DATA 



rc h::p.e£= 



rRAP4: .ASCII 'TRAPPED TO i 



. ASCIZ 
.EVEN 

iCCJTINE TO PLACE ASCII VAluE 
iFCR12: ADD ' " 



OF AN ADDRESS IN TO ADDRESS 'MESSAGE 



:G0 SAVE REGISTERS CN THE STAC.-. 
: ADDRESS UHERE ASCII VALJE5 ARE 
: WORKING 5 INDEX REGISTER 
:A0:'JST ADDRESS 
:5AVE 

: CHECK IF !1E*1 .IGMT IS A.AI.fiS^E 
;9PAN:ri IF NOT AVAILABLE 
; :S f!EK riGftT ENABLED 

;SAVE PAR SELECTOR SITS 
:3UAP BYTES 

:F0R»1 INDE«( VALUE 



:GET CONTENTS OF PAR 
: SHIFT COUNT 
; SHIFT kIPARl 6 PLACES 
: 2 MSB'S GO INTO R3 

: Clear par selector srs 

.•POR'* 19 Br ADDRESS 
: IN R2 S R3 
:FIR5T DIGIT '0 R3 




1&32 
1&93 
IcQ}* 
I&SS 

:&9. 

1 Tl^ 
t < 

* • w 4 

1722 

1705 
17Do 
1707 
1708 
17Q9 
17IQ 
1711 
171= 
1713 
1714 
1715 
1716 
1717 
i71S 
1719 
i7cC 
1721 
1722 
1723 
1724 
1725 
172b 
1727 
1728 
17=9 

1 7*5'^ 

* ' MM 



200H04 
QC6302 



■:n£ 



H04 



11:59 CALE 



0C17O4 
301710 
001716 
001724 

001726 
C0173C 
001732 
001734 
001736 
001740 
CC1742 
00174" 



:01746 
001746 
001752 
001756 
001762 
001764 
001766 
001770 
001774 
002300 
002004 
002006 
002010 
C02Q12 
002014 
002016 
002020 
002C22 
002024 
002026 
002030 
002034 
032036 
0020H0 

002042 
C02C44 



C127C5 ooc::3 

•'^324 :C223s 



'22 



_ ji3^ 
004767 
346767 
046767 
000207 

172340 
1723«2 
172344 
172346 
172350 
172352 
172354 
l'235fe 



C04767 
016600 
012703 
005002 
006100 
006102 
062702 
010267 
004567 
002040 
005002 
006100 
006102 
X6100 
006102 
006100 
006102 
005303 
001360 
004767 
012616 
000207 
OOQCOO 

OCCCOO 

005767 



176420 

177040 

177032 r 



176332 
000016 
00CG06 



DC02feC 
000040 
175754 



3« 

£!: ASw 

ce! 

3N£ 

31: "^CV 

-H: i:vs 

DEC 

B^e 

J5R 
SIC 
3!C 
RTS 

sflR'TfiS: KiPflRO 
KlPflRl 
KIPAR2 
KIPAR3 
KlPflR4 
KIPAR5 
kIPflRfc 
KlPflR7 



3S 
R2 
^3 

•3,R5 



I,* 



PC.SRES'R 
RELCCF.lli*2 
RELCCF. 411+2 
PC 



• DO".'' c'StT r^'i'^ 



: DIGIT SHIFT C^«a: 
:uOAD DlilT INTC !*ZUmJg 
: CLEAR IICEX 
:CEC DIGIT COUNT 

;RE5':Rt REGISTERS FSC* i 



:CE'jCN 



:CfiJ 
tcA: 



:I^E TO TYPE CCTflL VflLCE 
L: NOV VALUE. -(SP) 
:SR PC.02A 



li: 



2S: 



JSR 

MCV 

nov 

CLR 
ROL 
ROL 
ADD 

nov 

JSR 

2i 

CLR 
ROL 
RCL 
ROL 
ROL 
ROL 
RCL 
DEC 
BNE 
JSR 
MOV 
RTS 
.UORD 



PC.SSAVfi 

16'SP).R0 

i6.R3 

R2 

RO 

R2 

«2bO.R2 
R2.2i 
R5, SPRINT 

R2 
RQ 
fi2 
RO 
R2 
RO 
R2 
R3 
IS 

PC.SPESTR 

iSf'H,;SPi 

PC 



PUSHED ONTO STACK 

;PUSH VALUE ONTO STACK' 
•CALL ROUTINE 

:G0 SAVE REGISTERS CN "^HE S'mCn 
:aET VALUE 
: COUNTER 

tUORKING REGISTER 



:rCRM ASCII VALUE 

:MOVE CHAR TC TYPE uCCATICN. 

:GC TO PRINT ROUTINE 



: RESTORE REGISTERS FROM STACK 



: CONTAINS CHARACTER TO 3E TN°ED 



wCCFLO: .WORD 0 
: ROUTINE TO SA'.'E ABS LOADER 
4lDR: TST LODFLO 
£EQ 3S 



104 



:"35 
* "T 

:'3S 
.-4. 
:%3 

1745 

.>9 

1752 
1751 
1752 
1753 
1754 
1755 
1756 
i:'57 
1759 
1759 
1762 
1761 
1762 
1763 
1764 
1765 
1766 
1767 
1769 
1765 
1772 
1771 



ZZlZSz 
22=254 



77'' 



1775 
1776 
1777 
1779 
1779 
.782 
1781 
1782 
1783 
1794 
1785 
1736 

I '59 



002270 

CC2072 

002074 

002100 

002104 

002112 

002114 

002116 
0-3' an 

002122 
002132 



002134 
002140 
002142 
002144 

222150 
002154 
302160 
002162 
002164 
002166 
002170 
002172 
002176 
202200 
002204 



012700 

35lt|o 

000776 
£22626 
1627QC 
010067 
012702 
012703 
012023 
305302 
001275 
014367 
205367 
000227 



0C5767 
021001 
0002C7 
016705 

012724 
012702 
012425 
005302 
001375 
012745 
000000 
004567 
002210 
005067 
000207 



002206 QCOOOO 



002210 
032216 
202224 
C02232 



002236 
002240 
002242 
002244 



002246 
002253 
002260 
002266 
202274 
rrzzyc 



047514 
044440 
052123 
005015 
302236 

030460 
031462 
032464 
033466 



040514 
115 
020131 
051505 
240 
260 



www . WW 

00^ 122 
21=454 



176562 
'--cat 



042101 
222123 
051117 
220 



25E123 
246505 
042101 
020123 



-1-226C 



nc ? t nc 
24!lC5 



nun 



051117 
051104 
051511 



2i: 



li: 



0 = 

M * 

:rp 

SUB 

rov 

MOV 

MOV 

de: 

MDV 

CEC 
RTS 



:R:L■"I^E TC RES 
iRwDR: TS' 
9f€ 
RTS 
MOV 

«CV 
MOV 
MOV 
OEC 
QNE 
MOV 
.UCRD 
JSR 
JLCRM 
CLR 
R*5 

.*40R2 

.h3c:z 



Hi: 



IS: 



iwDRl: 



ir7-6.R2 

.-2 

•2202.ro 

RO.SLiRl 

•liQC.R2 

•LODftA.Rj 

fRO)*. :R3^* 

R2 

IS 

-(R3/.L5T.:: 
LOD«^w! 

TORE -OmDE= 
LODFwO 

2S 

p- 

SLCR1.R5 

■L0DAR.R4 
•1100.^2 

(fi4)+.;R5j+ 

R2 
IS 

;PC;*.-.R5 
0 

R5. SPRINT 

L0DFL2 
or 

• ^ 

0 

•lOhSEP := =E5^ 



:ir 'ir-E Cw- 'OhP .£'':& 



POINT RO SACK TO LCfiCER 
SAVE FOR RESTORE R:JT:'<£ 
WORD COUNT 

WHERE LOADER IS TC 9£ S^C^e: 
S'vRE wOfiDER 

:SA/E LAS' UO^C 0^ -CAOERS 
:RE'wRN 



;'jE: first address of UriEPE wOAO 
:TC BE RESTORED 

; ADDRESS i4HERE LOADER IS STOPEi: 
:wORD COUNT 
; RESTORE 



: RESTORE LAST LOCATION .SA'.ED 3V 
{LOADERS ROUTINE ABOVE) 
GO TO PRINT ROUTINE 



: RETURN TO CALMER 

: FIRST ADDRESS iJriERE L0A2ERS ARE 
iRES'OREC TC 

:'^Er'a5>.i2^ 



.EVEN 
:DIGIT TABLE 
iliTAS: "01 
"23 
"45 
"67 

: MESSAGES 
LS": .ASCII 
ADPES5: .ASCII 



'LAST • 

•MEMCPY ACDrESt IS " 



220262 CIGITS: .hSCIZ 'OjCOOO ' 



E5' cz3M5-a :-:i-4N memos^ exekcisef 



K04 



i;^ 

1796 
1797 
1798 
1793 
1523 
ISOl 

:so3 

1534 

1S3& 
1907 
180B 
1909 
ISIO 
ISil 

iei2 

1813 
1914 
1615 
ISlfc 
1817 
1313 
1319 
1822 
1821 
1522 
1323 
1824 
1325 
182& 
1227 
1323 
1S29 
1932 
1831 
1332 
1833 
1334 
1835 
193& 
1337 
1338 
1339 
1842 
1S41 
1S42 
1842 
1244 
■ cac 



0C£32fe 3:2: 



22c31£ 
002318 
002322 
002328 
002332 
002334 
002340 
002344 
002352 
Q02358 
002382 
00238S 
002370 
C02374 
002400 
002408 



002412 
002416 
002424 
002426 
D32-»34 
002440 
C02444 



002450 
0D2456 
002460 
002464 
002472 
0Q2476 
002500 
022502 
QC2506 



012737 
012706 
004767 
004567 
011752 
005037 
005037 
013737 
012706 
005037 
012727 
000000 
005037 
005037 
012737 
005037 



305067 
032737 
201007 
012737 
005037 
005167 
C04767 



022352 
000500 
177516 
176426 

000746 
000750 
000750 
000500 
006520 
002352 

000742 
000754 
000502 
000026 



176334 
012000 

002444 
177572 
176326 
00427a 



012737 QQ2510 
010701 

G04767 C0436Q 
012737 007142 
012702 020020 
010203 
010322 

062703 000022 
000774 



177570 
000:24 



QC0204 
C0C250 



PLACE: 



.WORD 
.SBTTL 



1EM0RY ADDRESS TESTS 



THIS TEST ADDRESS MEMORY 'S TC 128K AND PROVES 'UNIQNESS' OF A.- 
MEflORI ADDRESS IN A 32K SIGfEM^. THE TEST WRITES lUlO EfiCr. riMCRY 
ADDRESS THE VALUE OF THAT ADDRESS AND THEN CHECKS FOR THE CORRECT 
DATA IN EACH ADDRESS 

THE TUELVE MOST SIGNIFICANT 8ITS OF THE .AST AVAILABLE MEIOPY ADDRES 
IS STORED IN R5. 
STARTING INTRUCTIONS 

LOAD ADCRESS=2QG 

PRESS START 

STACK POINTER IS AT 500 
♦»«»»**#»#<»#RESTART AT 162 TO RESTORE LZKiER******************* 



rMEMORY ADDRESS TEST 



222212 START: MOV 
MOV 
JSR 
JSR 

RESLDR 

TLR 

CLR 

17757C MOV 
START 1: MOV 
CLR 
MOV 

PERSTRT:.UORD 
CLR 
CLR 

003024 MOV 
CLR 



tSTARn,2»212 
iSTKPTR.SP 
PC.JLDR 
R5,f PRINT 



: CHANGE START ADDRESS 
:5ET UP STACK PTR 
;G0 SAVE MONITOR i LOADERS 
GO TO PRINT ROUTINE 



3IERCNT ; CLEAR ERROR COUNT 

3»LDDISP [clear DISPLAY REGISTER STORAGE LTJ: 

atLDDISP.3»CISPLAY :CLEAR DISPLAY REGISTER 

iSTKPTR,SP ;SET STACK PTR 

'clear parity error INDICATORS 

LOAD PARITY ERROR RESTART ADDRESS 
CONTAINS RESTART ADDRESS AFTER FAR E 
CLEAR PASS COUNT 
CLEAR RELOACATION FACTOR 
SET POWER FAIL TRAP VECTOR 



SiPEFLG 
•START 1. (PC)* 
0 

3»ICNT 
aiRELOCF 
•P0WN.3iPF\EC 
aiPFVEC*2 



:hec'< 



IF MEMORY MANAGEMENT IS AVAILABLE 



IS: 



CLR MKAVA 

BIT lB!Tl2.3tSUR 

BNE IS 

MOV llS.StERPVEC 

CLR StSftO 

COM HMAVA 

JSR PC.. MAMF 



; CLEAR MEM MGMT AVAILABLE INDICfl'CR 
; CHECK IF TO RUN WITH MEM MGMT 
:D0 NOT USE HEM MGMT IF SU12 JA5 SE' 
SET TIME OUT TRAP 
; REFERENCE MEM MGMT 
:SET INDICATOR TO -1 IF AVAILABLE 
:G0 ENABLE PARITY ACTION 



: ROUTINE TO WRITE VALUE OF MEMORY ADDRESS INTO MEMORY ADDRESS 
:FOR EXAMPLE ROUTINE WRITES 20000 INTO LOCATION 20000 
^RTUP: MOV lOONECSlERRVEC :SET TIME OUT TRAP VECTOF 



""5c«n rtS7'">t o»-cr-i 



MOV PC.Rl 

JSR PC.LDMMC 

MOV iMftABTO.SlMMVEC 

MOV 120000. R2 

MOV R2,R3 

MOV R3.(R2)+ 

ADD «2.R3 

BR .-6 

m:v us^^p'r.sp 



;LOAD TRACE REGISTER 

:SET HEM MGMT ABORT VECTOR 
: FIRST ADDRESS 

;LOAD CONSTANT _ _ 

I WRITE VALUE OF ADDRESS INTO ADCPEs: 

:NEXT VALUE 

•.WRITE UNTIL DONE 

:5ET S'ACr PTR 



_ - 1, 





nose T 4 








00252C 






UJCC~D 




is: J 


UwCSCD 


0C45b7 




1351 




ni cfiPfi 

uX9U£U 












'Pm 


UUC3j~ 


C1C701 






UJC30D 


0127C2 

JiC' J< 


nnptpn 


135& 
1957 




002550 


OIC^OO 


QonnQ? 

UwUUUC 


193C 


UJC33C 


If- 'flp 






UU~< D' 
U3C ' UU 

r, t ppm 


OOUPt? 


ioou 


nnpccp 


nmrpp 




UUC3BB 




nnpr?n 

UJC9/ C 


npnrn-a 

r>n 1 77*3 

wUX< < ~ 






! QCU 


•JUc9' ^ 


XU~~ww 




' ate 








13Q3 








iSDi 








19b9 
























lQ7t 
13' X 








13' C 


JuS9 ' 9 


nnn77i 


nonsnn 


IB' J 
1 374 


nnptnn 

wJCDUU 


n 1 ?7n£» 

UXC< aiS 


nnpfinu 

UJCOU~ 


n 1 070 ' 

UXw' ux 




1B75 








IB' D 








! P77 








1978 










UUCDUO 


UUw' w' 


i7fei4n 

A f O A lU 


IBBU 

'QQ1 
«SB1 


nnpf« t ? 

UUCDIC 


UUX~Cu 




UUCBi~ 


n 1 17m 




iOOC 


UUuDCU 






ISOJ 


UUCDCC 






UUC9C~ 


nnfm 

UUDwUJ 




1RRC 


UUCBCO 






lOBD 


UUCOJU 






IRP7 


UUCDiSC 






tRRR 


UUCDJ~ 






1889 


uucooc 




oconno 

www wUw 


1 RQD 


U<JCD~C 


UDCDUJ 




1 RQt 


JUCD~~ 


n 1 P7'?7 


nn7i74 

UW* Alt 


IRQ? 


UUCD9C 






1892 




XDC' UC 


nnnnn? 


1 RQ*4 

1895 


UUCDDU 


n 1 npns 

UXUCUJ 






□D?lS3 








0627D3 


nnnnn? 


1997 


002670 


010342 




1898 
1B99 


002672 


102403 




002b7M 


020227 


01777& 


1900 
1901 


C02700 


0C1371 



















JSK 

JSR 
SCRLF 



L04 

i:-=Ec-7fe 11:59 -hiE 51 



PC.JFCPMC :G0 TO FOnMflT RCUTHiE 

R5. SPRINT :uO TO PRINT RCUTI'iE 

RS.iPRIMT :C;0 TO PRIMT ROUTINE 



:RC-'INE TO CHECK THAT VALJE 0^ ^EflORY ftDCRESS WPS WRI'TEN ::==£:"'- 

W PC^Rl jLOflD TRACE REGISTER 

KOV 120000. R2 :SET R2 

MOV »D0NE1.2«ERRVEC ;SET TIPE OUT TRAP 
MOV R2,R0 

SUB «2.R0 : SUBTRACT 2 
JSR PC.LDMMO 
II: ADD i2.R0 

riQ. (RJ) + .R3 :GET WRITTEN VALUE 

CflP R0,R3 ; CHECK 
BEQ IS 

HLT : ERROR! TO DETERMINE WHICH ADDRESS uA= 

_ ^^^^ EXAMINE MEM MGMT REGISTER KIPARl 

ADD R2 AND KIPARl TOGETHER AS SHOUN SELCU 



:Ut^ITTEN IMPROPERLY EXAMINE R2 
:iIF MEM MGMT IS AVAILABLE) " 



R2-2 

KIPARl (772342) 
ADDRESS 



0 OOX XXX XXX XXX XXX 
0 000 YYY YYY YYY YYY 

ZZZ ZZZ ZZZ ZZZ ZZZ ZZZ 



DONEl: 



BR 

MOV 
MOV 



IS 

•STKPTR.SP 

PC.Rl 



:SET STACK PTR 
:LOAD TRACE REGISTER 



•.ROUTINE TO WRITE I'S COMPLEMENT VALUE OF ADDRESS INTO ADCRESS 
:FCR EXAMPLE ROUTINE WRITES 157777 INTO ADDRESS 20000 



000250 



3S: 

25: 
IS: 



TST MMAVfl 

BEQ 3S 

MOV 3tKIPARi.R3 

ASL R3 

ASL R3 

ASL R3 

ASL R3 

ASL R3 

ASL R3 

MOV R2.-(SP) 

BIC t20000.(SP) 

ADD (SP)+.ft3 

MOV iMMABtl.aiMMVEC 

BR 2S 

SUB 12. R2 

MOV R2.R3 

COM R3 

ADD i2,R3 

MOV X3.-(R2) 

BVS D0flE3 

CMP R2. 117776 

BNE IS 



: MEMORY MAGNAGEMENT AVAILABLE' 

:FIND LAST ADDRESS IF MEM MANAGE jSEC 



DEVELOP COMPLEMENT OF LAST ADDRESS 

SAVE BITS IF MEMORY IS NOT A MULTIPLE OF 

SET ABORT VECTOR 

R2=LAST ADDRESS 

COMPLEMENT VALUE IN R3 

WRITE COMPLIMENT VALUE INTO ADCRES5 



:SET JP TO CHECK COMPLEMEN' DATA URIT-'EN DCUN 



M04 



19Q3 
1904 

19:= 

19Q& 
19C7 
1909 
1909 
191C 

10' 1 

• • « * 

1912 

1913 

1914 

1915 

1916 

1917 

1919 

1919 

192C 

1921 

1922 

1923 

1924 

1925 

1926 

1927 

1928 

1929 

1930 

1931 

1932 

1933 

1934 

1935 

1936 

1937 

1938 

1939 

1940 

1941 

1942 

1943 

1944 

1945 

1946 

1947 

1948 

1949 

1950 

1951 

1952 

1953 

1954 

1955 

1956 

1957 

1958 



Dt ' 



002702 
002704 
002706 
002712 
002714 
002722 
002730 
002736 
002742 
002744 
002746 
002752 
00275b 
002760 
002762 
002764 
002766 
002770 



002772 
003000 
003002 
003006 
0030*4 
003020 
003022 
003024 
003030 
003032 
003034 
003036 



G0024C 
010701 

005767 176C4C 
001406 

012737 0CC200 
012737 007142 
012737 002770 
012702 020000 
010200 
005100 

062700 000002 

162700 000022 

012203 

020003 

001773 

104400 

000771 

000240 



17234= 
200250 
000204 



::'€3: njp 

10V 
BEG 

nov 

10V 

10V 
nov 

KOV 

con 

ADO 
SUB 

10V 

CMP 
BEO 
HLT 
BR 
NOP 



:LOflD TRhCE RE&ISTEP 
•.CHECK IF MM IS PtVftiL 



li: 



2i: 



PC.Rl 

•^nAvfl 

II 

i200.aikIPARl ::nIT KIPARl 
•MMAfiTO.SllMVEC :SET ABORT VECTOR 
iOONE4.ilERRVEC 
k20000.R2 
R2,R0 
RO 



12. RO 
•2.R0 

CRJ)+.R3 

R0,R3 

2$ 

2S 



; FIRST ADDRESS 

; FIRST DA'^A (COM 0^ ADDRESS: 



;GET ^PLJE 
: CHECK 



012737 003240 
010701 
004767 
012737 
012702 
005000 
005200 
012704 
010022 
005304 
001375 
000771 



004236 
007142 
020000 



01 0000 



020204 
QCC25Q 



CCNE4: 

: ROUTINE TO WRI'E BANK k INTO ALL ADDRESSES IN^A 4K BANK 
iD0NE4A,2tERRVE::SET TIME OUT TRAP VECTOR 
FC,R1 
PC.LDMMO 
•MftABTO.atMMVEC 
»20000,^2 



IS: 
2i: 



MOV 
MOV 
JSR 
MOV 
MOV 
CLR 
INC 
MOV 
MOV 
DEC 
BNE 
BR 



RO 
RO 

•4096., P.4 

R0.(R2)+ 

R4 

2S 

IS 



RO UILL BE DATA WRITTEN 
SET 4K COUNTER 

.4RITE BANK M INTO ALL ADDRESSES 



003040 022626 



003042 012737 003110 0C000« 

003050 010701 

003052 004767 003756 

003056 012702 020000 

003062 005000 

003064 005200 

003066 012704 010000 

003072 012203 

003074 020003 

003076 001401 

003100 104400 

003102 005304 

003104 001372 

003106 000766 

003110 022626 



023112 010701 

203114 212737 007174 000250 



D0NE4A: CMP (SP)+,(SP)+ ; ADJUST STACK PTR 
; CHECK THAT DATA URITTEN ABOVE CAN BE READ 



MOV 

nov 

JSR 
MOV 
CLR 
INC 
MOV 
MOV 
CMP 
BEQ 
HLT 
DEC 
BNE 
BR 

D0NE4B: CnP 



IS: 
2S: 



iD0NE4B.2lERRVEC 
PC. Rl 
PC.LDMMO 
l2dQ0Q,R2 

RO 
RO 

•4096.. R4 

(R2)+.ft3 

R0,R3 

R4 
2S 
IS 

iSP)+.(SP)+ 



; ROUTINE TO WRITE CONSTANT DATA INTO 4K 
:BANK STARTING WITH LAST MEMORY LOCATION 

MOV PC.Rl 

MOV »MMABTl.a»MMVEC 



'£i' ::jr=-^ 2-:zhk ^e.^or^ exe«;ci£er 

::3NBi.PlI MEMORY fiODSESS TESTS 



N04 



rftCYll 27.732) ia-5EP-rb 11:5? PhiE 53 



1%3 

I%5 
1955 
I9b7 
1%8 

1970 
1971 
1972 
1973 
1974 
1975 
197b 
1977 
1979 
1979 
19B0 
1981 
1962 
1983 
198M 
1985 
198b 
1987 
1988 
1989 
1990 
1991 
1992 
1993 
199M 
1995 
1995 
1997 
1999 
1999 
2000 
20C1 



003122 
002126 
C33130 
003132 
003 13b 
003140 
003142 
00314b 
003150 
003152 
003154 

003 15b 
003lb4 
0031bb 
003172 
003200 
003204 

003210 
003212 
00321S 
00321b 
003220 
003222 
003224 
C0322b 
003230 
003234 
00323b 
003240 
003242 
003244 
0Q324b 
003250 

003252 
003254 
003250 
0032b2 
0C32bb 
003270 



lb2702 
005000 
005300 
012704 
010042 
10240b 
020227 
001403 
005304 
001371 
0007b5 

012737 
010701 
004757 
012737 
012702 
022704 



?0COQ2 



012020 



01777b 



003252 22G20'' 



003552 
007142 
020002 
010000 



aOC250 



00140b 
012203 
020QG3 
001401 
104400 
005204 
001357 
005200 

012704 010000 

012203 

020003 

001401 

104400 

005304 

001372 

0007bb 

022b2b 

005737 000042 
001405 

005757 001330 
100003 

012737 QOOOOb 0007^2 



SUB 
CLR 

li: DEC 
MOV 

2$: MOV 
BVS 
CMP 
BEQ 
DEC 
BNE 
BR 

D0NE4C: MOV 
MOV 
J5R 
MOV 
MCV 

IJ: CMP 

BEQ 
MOV 
CMP 
BEO 
HLT 
INC 
BNE 

2J: INC 

MOV 

35: MOV 
CMP 
BEQ 
HLT 
DEC 
BNE 
BR 

DCNE4D: CMP 
T5T 
BEQ 
TST 
BPL 
MOV 



«2,R2 

RO 
RO 

«409b..R4 

R0,-(RS) 

D0NE4C 

R2, « 1777b 

D0NE4C 

R4 

2S 

IS 



: CHECK IF DDNE 



mD0NE4D,3«ERRVEC 

PC,R1 
PCLDMMO 

iMMflBTO.aiMrVEC ;SET ABORT VECTOR 
«2000G,fi2 

i409b.,R4 ; CHECK IF WRITE ABOVE STflP7ED ON 

;4K BOUNDftRY 

2$ 

;R2)+,R3 

R0,R3 

.+4 

R4 
IS 
RO 

«409b..R4 
(fi2)+.ft3 
R0,R3 
.+4 



R4 
3S 
2S 

(£PH,(S?J + 

3«42 

BEGINl 

LOGICfiL+2 

BEGINl 

lb.a«ICNT 



: BRANCH IF PROGRAM UflS NOT 

: LOADED VIA ACTU IN QV OR Aft M03ES 

: BRANCH IF NOT IN QV MODE 



:StT ICNT TO DO 1 PASS ONLY IN 



Bps 



£222 

« « * « 

rrst 

r-3c 
r-3t 



zZcS 



-C2S 

1334 

w * «* • 



* mm • 

toWS^ WtoVWto* WW to Wto to«# 



totototo^to to *to ^to 

::33Ih 2:s<c 

::33Sfc :;:3'^ 

:c236: ::M-t7 



—3 -Si. 

tototototo 

::33er 



totototo 



"^•^giri '":37'37 '"3t'£. 

WWWto* to toA«»* to' tototo 'Ato 

^-•^aru ^'Z^'UL •t—^r-'» 

toto^~to~ to*to' *to toWWtoto* 



"3» 




rn • • • t 

toto to 
k«»to«J^U& 



:c2-»5fe 2:5737 ::7::4 
::3-tl 

222^54 2;5727 «32&& 



:3o 



'£=• =--'£5-. 



J H HC^^(3w tototototo 

:-?:«•£ P£i!=-£c 

:e-.£H t ;p 12s. i.: 



'£5' ph"£ss wsr'EM He:v£ 

•£i;B';;B.2tr5c.r: 



c* c 

* • 

■1. 

82 

F3.- 



:JFWTE :«5ftCE REilS^ER 
:*.5H STflR'iNi BA'iK ■ :u *-£ ri'.- 
:C2 CONTAINS • CF 1=8. i.ll'l 

:«p:tten 9y .1x9 h:lt:ne «=:.£ 
:H£:r ixs fa^'epn 

:iET :n::vAt:p 'o ^ri'e ^;=-A. 2 



«Pr£ 2 xCfi 9 'IV PATTERN =TARTlNi AT ADDRESS 2J2DC 

^rE PATTERN IS NCRTfAL 3 XCR i I- NO PARrv "E.rORY IS A.i;i.H=.£. 

AND IS A f?CDZFIED PATTEPN 1^ PARITn IEHORy IS AVAILABLE. 

CONTENDS OF PARPAT IF : NO* C INCICA'E IF NORMAL yZZl'llZ 
::S 2EING JgED IN TESTS 9ElO*1. 
iZNEs: y.0\ tSTKPTR.S? :3ET STAOk PTR 

: LOCATE TRACE REGISTER 
:SE' "iriE OUT TRAP VECTOR 
:FLi5H S'^ARTING BANK t ON S'AC-^ 
:F-3H • OF =56. UOfiS ElOCkS 'C 
:CALL ROUTINE TC URITE 2\'C9= =!3''£: 



'Ov 

C»R 
JSR 



•OiNE7.StERRvE: 
•l.-v'SP; 



PC 3X9 



3 <0R 9 TEST PATTERN URI'TEN ABOVE 
•ERRTRP.JtERRVEC 



NEG 



^=.25&:.U0RD 

«CV 
POv 
flOV 
fOV 
J5R 



6.SP).Rfi 
RO 

RC. .PC)* 
0 

ISTKPTR.SP 
PC. Rl 
•l.-iSPi 
RD.-iSPi 
PC,.. 3X9 



3ET k OF 25b. WORD S^COkS «Rr*£N 
FORM TWO'S OOMPLEflENT 
SAVE I OF 25b WORD BLCCkS 
CONTAINS I OF 25b kORD s-CCnS " 
SET STACK PTR 
SET SCOPE PTR 
PUSH BANK I ON THE S'ACk 
PUSH I OF 25b. WORD BLOOkS TO 
CO CHECK DATA URITTEN 



:££T'JP TO RUN nODIFIED 3 XOR 9 PATTERN IF PARITY '•EflOR\ 15 AvAI.^S. 
TST aiPARAVA : BRANCH IF PARITY MEMOR"' IS NO' A'.^ 

:3KAri:H IF FhRITV FA' :.5' n^r't^ 



be: 

TST 



D0NE9 
2iPAP»AT 



u:9£- :45E n::5£ '£5' 



556; 



=392 
9-ar 

=:% 



CC35:S 




012701 



CCSO^o 
C0M767 



ciroti 

012701 
012737 
0127«6 
0K40H 
0^272-4 



353§26 

nnc T 



2C357H 

:2%i2 

323&lt 




^ «k M • s 



0247&7 



222025 
225737 
C^1402 
200137 
012706 
20H5b7 
002022 

3^ 

001402 



2::ir oqh25£» 

062707 020000 

311726 020000 

252767 :oc::: 



ZC2C'<2 
0CH256 



WW Wi#www w*w* wi 



•-•Si.*.- 

«»«»w«#W < W*te 



3>C 



WW ww*^w 



CCwwWl^ 



001116 22222- 
220022 



..... .. 



C05 



9N£ 
»•.••«• 

3fi- 



20NE9 



mi 



lURITE 
iCN£9: 



3 x:R 12 TEST PATTERN S^AR'INi fiT ADDRESS "2C0C 

■STKPTR.SP ;SET STACK PTR 

•DCNE's.ilERRVEC ;SET TinE OUT TRAP ^.EC::F 

PC.Rl : UPDATE TRACE REGISTER 

•2.-iSP) ;PU5H STARTING BANK I :n '-t B'h> 

-(aP^ :FuSH I OF 9ANKS '0 JRITE =*-:< 

PC 9X13 :G0 tq ROUTINE TO ^I'E Ch'h 



nov 

MOV 

rev 

CLR 
J5R 



::heck 



9 XOR 

nov 
»«ov 

NEG 

Bi: 

3E3 

nov 

JSR 



13 TEST PATTERN WRITTEN ABOVE 
•STKPTR.SP ;SET STACK PTR 

PC.Rl : UPDATE TRACE REGISTER 

•Ei^RTRP.aiERRvEC 

R4 

•1,R4 :S£T 4K BANK CCuN" TO 3K :%:R£^rr 

^0l«12p^ :D0 NOT CHECK IF ON^Y ISK 

PC!rlsxi3 ;GC CHECK 9 XOR 13 PATTERN JP:"£N hS; 



:re-::at£ prc^am 

tCNElO: RESET 



li: 



TST 
BE2 

:np 

••Cv 
JSR 

522200 

www** 

TST 
SEO 

J.np 

ADO 
9IS 

ncv 



3142 
2S 
SiRhNTST 
■STKPTP.S 

s.relo: 



R4 
31 



HECK AOORESSES TRCfl 200000-217776 JSlNi 1 

DISABLE MEN ni«T AN2 PARrv hC'IO 
CHECK IF PROGRAM LChCED iC'i: 



SIRANTST 
■22002. PC 
•25oO0.se 
•lOOOCfi.LDCISP 
LDDISP,S«0I5PLAY 



DO NOT RELOCATE IF AC^ll 
SET STACK PTR 
RELOCATE PROGRAM CODE 
FROfI 000000 TO 
23300 

/iAS RELOCATION SUCCESSFL^" 

BRANCH IF SUCCESSFUL I.E. w^^S 

SUFFICIENT ^nCRV TC RELCCh'E 

END OF TEST 

RELOCATE PC 

SET NEW STACK PTR 

SET RELOCATION INCICA'CR 

wOAD 0ISP.AY REGISTER 



:*##**»»**»t#*»#»»«»*#If1P0RTAN"' NOTE»t*«**«»»«*«»»»»»*»*******»***** 

•.PRCGRAf! IS NCU EXECUTING CODE ^ROM PC AS SHOWN BELCU +22222. 
::AJ'I0N: DO NO^ ATTEMPT TO RESTART PROGRAM AT 2Q0 



::'€ii: fov 



PC.Rl 



: RESTART ADDRESS TO LOOP 'E5' 




.^CV 



PC.Rl 



: RESTART S ^OCP "^EST ADDRESS 



Z' 'S 



s:-t3 

li^ 

2147 

^« WW 
S'C! 

2:5-4 
2155 



3SH00b 
C0H02H 

Some 

004C. 
QCH03& 
□04040 
OQHOHM 
0GM0S2 

23'*:fe2 



WW ■ ' w 



tow wiw* 




mwc3*4w 



OCwDOw 

m 

" 737 
012737 
025737 
X&367 
00&%7 

oirofe 

010701 

004567 

nnnn 



'^''37 '& 

04006i3 xxSfrS 

030240 w'wAw^ 

iOOOOQ 2:27=: 
175204 
024040 

^col 

117776 
000034 
000100 
000500 

^is 

002216 



177£~: 

cc:::-^ 



WWW! wU 



005704 
001402 

066707 
066706 
05*767 
216737 



004256 
177762 
177755 

A wwUww 

: 74662 



177572 



2156 

e:£9 

2160 
2161 
2162 
2:63 
2154 
2165 
2166 
2157 
2169 



004074 010701 



2C3366 



224076 
004130 
224102 

CQ41S4 



005046 
012746 
020000 

004767 003646 



204112 010701 
224112 0C5046 

i:-::4 -isT'-s 



DQ5 



-h:.:; r -5= ic-5Ep-'& ii:5q Pf^'Ji 56 



: .\vS 5 TEST PfiTTEPM flS UOITTEN hBCvE 



JSR 



•32.. -.5P 
1X8 



;PUSri STARTING BftMK « CM T-^E E%:> , 
iPL'Sh I OF 128. UCPD BLOCKS .fin 
:G0 TO ROUTINE TC CHECK jPi*a 



li: 



ci: 



3i: 
4J: 



20030 
000000 

:nc 

10V 

Bi: 

J10V 

• w > 

TS' 

ricv 

flSL 
ASL 
MC 
MCV 
3IC 
MOV 
JSR 

000000 

40000 

TST 

BEQ 

J«F 

ADD 

AOC 

BIS 

flOV 



: RELOCATE PRCiRAI TC CHECK ADCRE55ES 000000 - 0377?6 'JSING 
:3 \CR 9 A^e 9 \0R 13 PATTERNS 

*:•€!=: lOV PC.Rl ; UPDATE TRACE REGiS'^ER 

RS.REuOC .-MOVE PRCGRAM BACK T! ^Z^IV " 

:FR0f1 20000 TO 
: 000020 

21. +4 ;RE*URN UNRELCCA^tC 

l4CC00,2i 
•3c..BLKCNT 

•iQCftOO.StLDDISP : CLEAR RE.CCATION :n::C-':= 

LjDISP.SiDISPLAY iCISPLAY NOT SELCIA^EC 

•3S.5I&RRVEC :SET Tlflg OUT TRAP 
210^7776 ;:"ECK IF 12K OF nEMORY IS A.hl^iH.E 

llS.aiERRVEC 

311 17776 : CHECK IF 20K OF r.E-OfiY 

2S 

BLKCNT 

•STKPTR,SP :5ET STACK POINTER 




R5.REL0C 



R4 
4J 

SIRANTST 
21, PC 
21. SP 



: RELOCATE PROGRAM 
:FROn 000000 
;T0 40000 

: RELOCATION SUCCESSFUL" 
;VES 

:G0 TO RANDOn DATA TEST 
: RELOCATE PC 

:SET NEW STACK F^R 



iNc:;i':= 

=TE5 



•itOOOO.LDDISP ;SET RELOCATION INDICATOP 
LDDISP,ilDISPLAY:RELCAC DISPLAY REGISTER 



♦♦#«t*»#«»»#»»*»*#*#IHPORTANT NOTE******************************** 
PRCGRflfl IS NOU EXECUTING CODE FROM PC AS SHOWN BELOW +42020 OR +i::: 
CAUTION: DO NOT ATTEMPT TO RESTART PROGRAM AT 200 
#♦♦♦»#♦♦♦#♦♦*♦♦#«♦♦*»»*«#*♦♦♦♦♦***»*♦*♦*»♦***♦***♦♦♦»*♦***♦***♦*♦♦♦* 



CLR 

D0NE13: MOV 



3IPARPAT 
PC.Rl 



.-SET INDICATOR TO WRITE NORMAL 
: UPDATE TRACE REGISTER 



5v: 



: WRITE 3X0R9 TEST PATTERN IN LOCATIONS 000000-037776 OR' C20000-277776 



CLR 
MOV 

BuKCNT: .WORD 
JSR 



-(SP5 
(PC)*.-.SP) 
0 

PC,. 3X9 



PUSH BANK • 0 ON THE STACK 
PUSH 256. BLOCK WORD COLNT ON STACK 
CONTAINS 256. BLOCK WORD COUNT LOADE 
BY ABOVE ROUTINE. 40 100 IF 3 16K 



sr 



: CHECK PATTERN IJRITTEN IN LOCATIONS 000000-037776 OR 200202-077776 

CLR -i§pi :PUSH STARTING BANK I ON THE STACK 

MOV B..KCNT.-.SF :PUSH 256. WORD B.CCK COjN' CN THE 5' 



EQ5 



c li:S9 PHiE 5: 



w * 



5153 

!:35 
|;sfc 

s«3> 
7*ao 



= •3: 



=:=5 
= 1=3 



= =rp 
3 

tato«#M 

to«»w ' 

2rC9 
asra 

=211 

£5:2 

2214 

22:fe 

2217 

£219 
35 -a 

£222 
2££1 



2=24 



W W ^ A W to 

WW • • w 
to • to* 



WW • WW 

ww9' w* 

>• » n"»r • 

5:2*wfe : 



£139 2:-»:fee 
£15? 2C41*2 



2:42:2 
234214 
224223 
224222 
224226 
224233 
224232 
22'^23c 

WW 'to to 

— ^scr 

WW *«R»W%# 



224256 
2242&G 
224266 
GC4272 
204274 
034305 
0043C4 
304312 
224320 
0C432H 
304326 
024332 
004334 
CC4336 
2C4340 

224342 
224346 



21276" 
222767 
321432 
C26367 
OlOTOl 
M4567 
34X32 
OOCCOO 
220137 
212726 
242-37 
213737 



Cl c * 
212737 
035767 
001412 
334767 
105237 
012737 
012737 
012702 
00500H 
012705 
012422 
012422 
005335 
00:374 

012705 
014400 
2:-»222 



212721 
2CS246 

02476^ 224526 



WW^ WWb 



220226 



224236 



304416 
174460 

002544 
172301 
077406 
000402 
020000 

204C20 



^'"-■47" 



nn--3a 

177!'''^ 



-I •"-—J 



i723Gi 

:7254-* 



JaR PC...3XB 
ifPARPAT 



•31 

3NE 
BR 

9 XOR 13 



::n£:-- 



10V 
J3R 



a?!¥iRPAT 

.31 BAT'EPN 
PC.Rl 

•a.-.SP) 

pc.sxn 



CHECK 

ORB PhTTFRN ahOULO BE P-'i 

brhmch if oarity fiEr.cpc h:t a,;:. 

BRANCH IF MODIFIED PA'TER • J-S' = 

SET INDICATOR TO WRITE .rOCIPIEC 
:LOOP TEST USING nODIFIED PA^'EF", 

Locations OQOOOO-037777 

: UPDATE RESTART J LOOP ADDRESS 
:PUSH STARTING BANK t IN T-E S'P:- 
:PUSH t OF BANKS TC URITE ON >E ; 
:G0 TO ROUTINE TO WRITE Dfi-'A 



:4e:k 3 \:r 13 ^hT'ern ^^v 

"OV PC.Rl 
:;.P -(aPi 

rov iI.-.spj 

JSR PC... 9X13 



'EN A30VE 

; UPDATE RESTART S LCCP A:2=£=: 
;PUSH SANK • ON THE STACk 
;AND t OF BANKS TC CHECI- £. 
;C0 TO CHECK ROUTINE 



: RE.:; ATE PRCGRAf* BACK TO -OUEP ^^EKCRY 



NOV 

cnp 

9E0 

ASL 

JSR 

u-vnn 

20030Q 
J* 

MCV 
BIC 
?10V 



■40020,11 
•40.8UCNT 

IS 

PC.Rl 
RB.RElCC 



at. -^4 

tSTkPTR.SP 
tlOOQSO.aiLDOIaP 
atLODIS^.atCISPLAY 



UPDATE TRACE FEilS'EF 
r'OVE PROGRAM SACK INTC .:.,£? 
fROM 40022 OR 1C0CG3 
TO OOCQCO 

RETURN UNRELOCflTED 
RESET STACK POINTER 

: CLEAR RELOCATION INDICA' 
:LOflD DISPLAY REGIE'ER 



.SB"^T^ RANDOM DATA.RCTATING 1 0 TESTS 
RANDOM DATA TEST. THIS TEST MOVES THE PROGRAM CODE TMROUaM:^" r: 

SET TRACE POINTER 

SET TIME OUT TRAP 
CHECK IF MEM MGMT IS AVAI.AS-E 



ftANTST: MOV 

MOV 



:s: 

2i: 
3S: 



4i: 



TST 
3EQ 
JSR 

INCB 

MOV 

MOV 

MOV 

CLR 

MOV 

MOV 

MOV 

DEC 

Brc 

MOV 
MOV 
MOV 



PC.Rl 

•7i,aiERR.'EC 
MMflVfi 
IS 

PC.LDMflO 
atKIPDRO^l 

•200*256. -400+UP*RW.3iKlPDR2 
t400.atKIPAR2 



BRANCH IF NOT AVAILABLE 
GO SET UP MEM MGMT 
ALLOW 4K ADDRESSING IN F:RS^ 

:SET kIPDR2=?.. J 



•20060, R2 
R4 

•2049.. R5 

(R4)*.;R2)* 

(RHi*.iR2)'»- 

R5 

3S 



.-SET -TO' ADDRESS POINTER 
:SET -FROM" ADDRESS POINTER 
:SET 4K WORD COUNT 
•.MOVE CODE 

: DECREMENT 4K WORD CCuN^ER 



:SET 4K WORD COUNTER 



•40%.-PLACE*l.R5 
-CR4).R0 :GET 
-.F2..R3 :GET 'BAD* DATA 



G^iD' DATA 



FOB 

> 11:5^ FhiE 53 



fill 

£23: 
2232 
2233 
223-* 
2235 
223& 

223S 
2239 

22w: 
22-*: 

22^E 
22^fe 

22^3 
::«3 



2252 



C:*>352 
CCH354 



5t3r6 

23'+H:t 
:c-f-»22 



c:H-t3& 

:C4442 



001423 
005742 



ii 

205237 
OOCTHH 
0S2702 
2C0744 
C12726 
:i273" 



::&7-»b 

3:"47&7 

3:2%t 

0Ct7fc7 



irn35s 

r23«2 
172344 

npi t nr 



< . < . 
A I 9 3S 



St. 



bS: 



3E2 

Ts: 

T5' 
DEC 
3NE 

IjT 

BEQ 

INC 

INC 

3R 

ADO 

BR 

MOs 

1CV 



r:.p3 

.R2'* 



•He 



41 



::cnpfifiE -Gooc & 'Bm:- :h'h 

:RE5T0f5 ADDRESS POINTER 
:OECRErCNT 4K UORD COJTER 
•.LOOP JNTIL 4K U0RD5 CHECrEC 

; CHECK IF flEM MGriT IS h.'AI.A3-E 
: BRANCH IF NO' m;AI.h2.E 



nriA'.A 

^IklPARl 
3IKIPAR2 
IS 

l|4..Re 

iSTkPTR.SP 

•ERRTRP.£iERR»EC:RESTORE ERROR 'RAF .'EC'CP 



:S*EP ADDRESS 
; RESET STACK P^R 



iCr'A'I'iG 2 TEST. THIS TEST ROTATES A SINGLE '0' TriROuiM r^£-^:c 



1'*.' 

.rev 
«cv 

JSR 



ncv 

JSR 



.CONST 



ii.-oP) 
WD5.25fe.-.SP^ 
PC.wSEft 
PC.Rl 
II - SP' 
X§.25b.-.5P 
PC.ROTfi 



SET CONSTANT =177777 
SET BANK ll 
GET • OF 256. WCRC BLCCkS IN lEy.Z' 
GO WRITE rS THROUGHOUT «£r!CF.Y 
SET SCOPE PTR 
SET STARTING 3Af#: I 
SET I OF 256. UORD BLOCKS 'C 
GO TO ROTATE 0 ROUTINE 



IIP 

2258 
22b2 

ZZL' 



22e£ 
22 bb 

zzt.a 



zc7e 
2273 
2274 
227S 
227| 

22'S 
2275 



— 447-1 

:2'*t7-» 

C2453: 

::45D4 
::g45:2 

COnSlb 
!:0n52S 




X4556 
334560 
004564 
024564 

::o4|7o 
::C4572 

004576 
wv'tbwO 



012746 
016746 
004767 
310701 
312746 
016746 
3C476- 



oooocs 

1 » ".•7'" 1 

012706 
005237 
022737 
001405 
004567 
012340 
000137 

004567 

212342 

105737 

100375 

01 3r 00 
• ta"" 



l?032 
004640 

000001 

004-r&6 



174202 
003276 
174170 



«tfww .« 



:^C'i': 
l-lE^C'i 



: "'EST THIS TES"^ .cCTATES A SINGLE 
CwR 



BIT TwpC-> A_ 



:EriC 



:cr€: 



MOV 
JSR 
MOV 
^OV 
MOV 
JSR 

OF CYCLE 
FESET 
MOV 
MOv 
INC 
CMP 
5E0 

ASTERISK 
JMP 

JSR 

ENDMSG 
TSTB 
BPL 
MOV 
SEO 



.CC.N5T 
ii.-(SP) 
UD§.256.-iSP 
PC.USEft 
PC.Rl 
•l.-iSF) 
UDb.25b,-.5F' 

PC... rot! 



CLEAR CONSTANT 

PUSH STARTING BANK ONTO STACK 
AND I OF 256. UORD BLOCKS IN ME." 
GO WRITE O'S THROLGHOUT MEMORY- 
SET SCOPE PTR 
SET STARTING BANK • 



SET » CF 256. 
iC ROTATE A " 



UORD BLOCKS CSECr 



PC.Rl 

tStKPTR.SP 
3IICNT 
•7,3lICNT 

DONE 

R5.IPRINT 


: UPDATE TRACE REGISTER 
:5ET STACK PTR 
INCREMENT PASS COUNT 
:a PASSES' 

: BRANCH IF 8 PASSES C:^=-£'E: 
:G0 TO PRINT ROUTINE 


StBEGINI 




R5. SPRINT 


.•GO TO OR INT ROJTI.NE 


3ITPS 


:»JAIT FOR BELL TO RI.NG 


.-4 

ai42.P0 

FINISH 


:GET DECTAFE "ONrCR .RE'-^N A 



5=03 

list 

£288 
££39 
£29: 
££91 

2£5E 
££% 
2£r 
££?e 
££99 

WW • 

£3Cy 

12% 

£3:3 
£3:9 



"-•li 
£515 

£3:r 

taw 

2319 
23£0 

£322 
£323 
£324 
£325 
c32& 
2227 
£ w2S 
£3£9 

:322 
:33 



:334 



2C4&20 
CC4S22 



;£>iN riEr:Rv e\£«;::sef 

WW W' 



:C24C 
000240 
C0024C 
0C0167 



1-5322 



• ' w wn.^ 



0 testI 

JSR 

NOP 
NOP 

FINISH: JflP 

-SBTTL 
.SBTTL 
:OR0^An • 2 



GOB 

iO-5EP-7fc 11:59 PfiGE 59 



C:4b32 22SC&7 001062 



004634 
204640 
024644 
004646 



01272| 
0050£7 

oocoSo 



00-*664 
004670 
004676 
004703 
004702 
034706 

::47:c 

004714 
004722 
0:h726 
304732 
004736 
004742 
004744 
004750 

mm 

0C-»760 
004764 
004764 
004770 
0C4772 
X4776 



005067 
032727 
0C1006 
000261 
005737 

103402 
005167 
012737 
005037 
005037 
005037 
004567 
012016 
004767 

oooooc 

005767 
Sl4Q2 
0Q4767 

304567 



£33: 01 
£321 01 



XOOOO 
005767 
001002 
004767 

004567 
012102 
004767 

00^567 



005006 

025016 
C0SC20 
205024 
:C5026 



oooso: 

006522 



174262 

OICCO: 177570 
177572 



174036 
OOUlfc 
00074= 
000750 
003366 
174015 

004616 

177772 

oor60 

173770 

004s / : 

k( < I >c 
«tfQ * w3& 
173-42 
0Ct54£ 



OC.SRLDR 

PCRO) 

START 1 

USER TESTS 
PROGRAn I 2 



: RESTORE MONITOR I LOAOERS 
;G0 TO DEaftPE fl&NlTOP 




iNOTE: 
^RG2A: 



ALuFLu: 



PROGRflK 3 ENTERS PROGRAM 
•STKPTR.SP 



.FhP.j 



MOV 
CLR 
w^R 
.UCRD 

nov 
nov 

BIT 
9NE 

3e: 

T5T 
BC5 

ccn 
rev 

CLR 

CLR 

CLR 

J5R 

PARITY 

JSR 

.W3RC 

T5T 

BEQ 

JSR 



JSR 
5TBANK 
JSR 

,='EANK:.UORD 
TST 
3NE 
JSR 

JSR 
BANkS 
JSR 
.WORD 
JSP 
PAT 
J5F 



3i: 



StPEFLG 

vPC' + 
0 



I c HERE, UITH PRG3FLi = 
:SET STACil: PTR 

; CLEAR PARITY ERROR ir€ICfiT::<5 
: CLEAR RUNNING ALL PATTERNS F^A 
; CONTAINS RUNNING ALL PATEFMS^F 
;0/-l = RUNNING SELECTED 'Al> 'A 
•PDWN.3iPFVEC :SET POWER FAIL TRAP ^EC'CP 
•ERRvfc*2.3lERRVfC 
nrAVA 

■BIT12.2tSUR : CHECK IF TEST IS ^C BE P-N 
If :UITH MEN nG«T ENABLED 



atSRO 
IS 

MMAVA 

lERRTRP,£iEPR.EC 

2«ICNT 

aiLDDISP 

3*PARPA' 

R5,SFPIN^ 

PC.RECD 

n 

TpARr 

IS 

PCMAMF 
R5.JPRIN' 

PCRECD 

TSTBfiNk 
3S 

PC.RELCCP 

RS.JPRIN' 

PC.RECD 
0 

R5.JPPINT 
FC.REC: 



; CHECK IF riEM MGKT IS A.'hI^AS^E 
: BRANCH IF NOT AVAI^Aa^E 



5E^ INDICATOR TO wRITE NC^n 3v 
30 TO PRINT ROUTINE 

GC GET ANSWER TO THE PARITY G« 
TYPE i IF PARITY DESIRED Q I" 

BRANCH IF PARITY NOT DESIREO 



ENABLE PARITY ACTION 



GO TO PRINT ROUTINE 

ASK USER FOR STARTING BhNn 

CONTAINS STARTING BANK t 
CHECK IF STARTING AT BANK iO 

GO RELOCATE THE PROGRAM '0 TCP 

GO TO PRINT ROUTINE 

ASK USER FOR • OF 4k BANKS TO 

CONTAINS • OF BANKS TO CHECh 
GO TO PRINT ROUTINE 
ASK USER UHICH PATTERN 



- J - . 



I>l 
£343 
£3-»'* 

-» " 

£3-^3 
£3-»9 
235C 

- -c? 

£353 
=354 
£355 
£35& 
2357 
£358 

£3E)G 
£351 
£363 
£353 
£354 
£3&5 
£355 
£357 
2358 
£359 
£370 
£37i 
£373 
£373 
£374 
£375 
2375 
2377 
£378 
£379 

£382 
£385 
2384 
£385 

-"Ok 

£389 
£39C 



::5>: 

225CU 
C35Q52 

ZZSZ7Z 
225076 



305 * «jC 
005102 
C25i04 
205105 
OOSliO 
0051 :£ 
205U4 
005115 



0C5120 
005124 
005130 
005132 
005135 
005140 
035142 
005144 
005146 
005150 
005152 
005154 

.005150 
005154 
005170 
005174 
035200 
005204 
005205 

005210 
005214 
305220 
005224 
005225 
005230 
025232 
005234 
005236 
005240 
0C5242 



212757 
:34757 
016'2C 
0C63Q0 
C567CC 

0100C7 



:051£0 
205212 
005£75 
305370 
005475 
005573 
205555 
005575 



015746 
015745 
005315 
005757 
001024 
005315 
006315 
006315 
006316 
011627 
000000 
004757 

015745 
015745 
004767 
005257 
005757 
OOIOOI 
000744 

015745 
015745 
005767 
001004 
006315 
006316 
006315 
006316 
01]£27 
000000 
204767 



;;=:•»£ 
-345-4 

17S655 

oosi:: 

17355= 



1. ''fc5£ 



QC£232 

177512 
17775£ 
D023£5 
173542 
177442 



177553 
177524 
002472 



:cc 



HQ5 



M-V 

t IV * 

A5L 
ADO 

nov 

ADD 



i:-=Eo-7fc 11:59 ^fiiE 52 



•PRGSR.PERi'RT 
PC.CKSWR 

.pAt.ro 

RO 

RELOCF.RO 
URrAB^OJ.RC 
RELCCF.RC 
RC.PC 



:C0M7ftIN5 PfiTTERN a 

:SET PAR ERROR RES'^ART fCZ^lll 

:G0 CHECK SWITCHES 

: SHIFT PATTERN I TO FORM I'CE' 

:ADD RELOCATION FACTOR 

:aET UNRELOCATED PC CF RC-':%£ 

'.ADD RELOCATION FACTCR 

:G0 TO APPROPRIATE RCjTINE 



:Th3.E OF ROUTINES TO ^RITE SELECTED PATTERNS 



nose* -I 



..CT'AS: .WORD 
.UORO 
.UORO 
.UCRD 
• WORD 
.WORD 
.UORO 
.UORO 

:C:.'INES 

4ix2: nov 
nov 

A5L 
T5T 
BNE 
ASL 
A5L 
ASL 
ASL 

li: nov 

2i: .WORD 
JSR 



nov 

JSR 

INC 
TST 
3NE 
BR 

nov 
nov 

TST 
BNE 
ASL 
ASL 
ASL 
ASL 

nov 

.UORO 
JSP 



i3X= 



£i: 



SIX'S 
S3X9 
S8X13 
SUSER 
IROTO 
iROTl 
I3X9P 
iALL 



.ST3ANK,-;5P. 
. BANKS. -.=?' 
(SP) 
PR33FLG 
IS 

.SP) 
CSP) 
:SP) 
(SP^ 

(5P).'.FC) + 

0 

PC. 1X8 

.STBANK.-v'SPJ 

2S,-(SP) 

PC... 1X8 

ICNT 

ALLFLG 

i3X9 

ilX8 

.S"'BANK.-C5P 
.8ANKS,-,5P^ 
PRa3FLi 
IS 

(SPi 
(SP) 
:5P) 
iSPi 

tSP). .PC1+ 
n 

PC. 3X9 



1 XCR 8 ROLTINE 
3 XOR 9 ROUTINE 
8 XOR 13 ROUTINE 
USER ROUTINE 
ROTATING '0' ROUTINE 
ROTATING T ROUTINE 
PARHY 3 XOR 9 PATTERN 
iALL EXCEPT USER 



■5 



::HE:k PATTERN URITTEN mECVE 
5$: rtCV .STSfiNk.-.SP 



GET STARTING BANK t 

GET ft OF 4K BANKS 

MULTIPLY 8Y 32. 

IF PROGRAn t 3 STOP i^I> ==i. 

WORD BLOCK COUNT 

"^0 FORn 123. 

UORO BLOCK 

COUNT 

SAVE 

CONTAINS 123. WORD BLCCK COuN' 
GO URITE 1 XOR S TEST PATTEH.n 

GET STARTING BANK i 

GET 128. WORD BLOCK CO-JN"^ 

GO CHECK PATTERN 

CHECK IF RUNNING ALL PA'ER^S 
GO START 3X9 PATTERN IF RL^.^:^; 
CTHERUISE LOOP 

GET STARTING SANK ft 
GET ft OF BANKS 

IF PROGRAM ft 2 S'OP wl'.- £=a. 

UORO BLOCK COUNT 

MULTIPLY BY 15. 

TO FORM 

255. UORO 

BLOCK COUNT 

SAVE 

CONTAINS 255. wORD E-CCn CC-N' 
GO URITE PATTERN 



:"iE' STAR- in: 3hNK ft 



105 



IC-SEB-rts 11:5S PfiiE E>1 



12^" 

=•*:: 

£>-:5 
=-.:& 

£-»:§ 

£-»12 

£^:= 

£413 
£-lt 
£"^15 

• ** ' ^ 

£•*:" 
=4*0 

£"•£3 
£"•£1 

£-»££ 
=-t23 
£-<24 
£-£5 

24££ 
£^2S 

2-i32 
£-432 
2^2H 
2435 
243& 
2427 
2-»2B 
2439 
244C 
2441 
£442 
2-'42 
£444 
2-*4£ 
2->:c 
2-47 
£t48 



a^to Wto 
<vto <9W 

205272 
CC5274 

235276 

:C53D4 
235310 

225322 
:2532£ 
225326 
22533C 

225334 
22534C 
C25344 
2C5350 
20535*' 
305360 

225266 



225372 
205374 
005376 
C05402 
0054C4 
005410 
005414 
005420 
005422 
005424 
C05426 
005430 
005432 
005434 
005436 
005H42 
005446 
005452 
005456 
005462 
005466 
005470 
0C5474 



2I67'.6 

Ww ' *rf • 

22526^ 
225"6" 

20276*' 

005737 
2010C7 
21674a 
016745 
2327:6 
201405 



22456' 
01215= 
00016' 



004767 
016746 
216746 
024767 
005267 
205767 
00124-1 

ww«rf' >w 



204567 
012161 
004767 
000200 
016746 
0167H6 
005767 
001004 
006216 
006316 
006316 
306316 
011627 
000000 
004767 
016746 
016746 
004767 
005267 
105737 
100346 
005737 
C0C735 



w* ^ w 



r'sio 

MWw WW * 



'3-J£ 



2233C6 
177432 
177454 
003350 
173362 
17'£52 



17336-1 
004164 

177356 
177410 
0D22'6 



002706 
177330 
177762 
003744 
173260 
177560 

177562 



JSP 

:v: 

SNE 
BR 

•5T 
BNE 

flOV 

nov 

SIT 
SEQ 

JSP 

:je; 

nov 
«ov 

JSR 
INC 
TST 
BNE 
ER 



:RC-^TIHE TC WRI 
LSER: 

JSR 



55\i: 



2S.-(SP^ 
PC,..3\9 

S9\n 

3S 

aiPRG3FLG 

!|TaflNK.-(SP) 

•i.CSP^ 
21 

RS.iPRIN- 

PRG2 

PC.. 9X13 

.STBfiNK.-;SF) 

.BflNK5.-:SP^ 

PC... 9X13 

ICftT 

flLLFLb 

SROTC 

S8X13 



:GET I OF 2S6. UORO BLSCkS 
:G0 CHECK PATTERN 



:CHE 
:G0 



CK IF RUNNING ALL PAT^EViE 
START 8X13 PhTTEP'i IF t-jM,:'.: 



CANNCT DC 8X13 PATTERN JSI'iG 

PROGRAM ■ 3 

GET STARTING BANK ■ 

AND I OF 4K BANKS 

MUST BE AN EVEN t OF 4K S^'A 5 



;G0 TO PRINT ROUTINE 

Iprint 7 

; RESTART 



:GC JfilTE PATTERN 



;C CHECK PATTERN 



: CHECK IF RUNNING ALi. FA'ER^S 

;iO DO ROTO PATTERN IF fij. SELEC^E: 



;ONST: 



2i: 
3f: 



CCNST 
JSR 
.XRD 
MOV 
MOV 
TS' 
BNE 
ASL 
ASL 
ASL 
flSL 
MOV 
.UORD 
JSR 
MOV 
MOV 
JSR 
INC 
TSTB 
BPL 
TST 
BR 



:E I CHECK LSER CONSTANT 
R5. SPRINT 



PC.RECD 
0 

.STBANK,-(SP) 
.BANKS.-iSP) 
PRG3FL6 
2S 

(SP) 
(SP) 
(SP3 
(SP) 

CSP).CPC)+ 
0 

PC.. USER 
.STBANK,-(SP) 

PC... USER 
ICNT 
aiTKS 
IS 

aiTKB 
SUSER 



;G0 TO PRINT ROUTINE 
:ASK FOR USER CONSTANT 

: CONTAINS USER CONSTANT 
:GET STARTING BANK t 
:GET 4k COUNT 



; MULTIPLY 4K BANK COUNT 3Y 15. 
:T0 FORM 256. UOR: BLOCK COLNT 

:SAVE 

;G0 WRITE USER CONSTANT 
GET STARTING BANK t 
:AND • OF 256. UORD BLOCKS 
:G0 TO USER CHECK ROUTINE 

: CHECK IF USER HAS TYPE2 A CHARACTER 

: CLEAR FLAG 



ROTATING "O" ROUTINE 



'.J 



MOV 



.STBANk.- £P) :GET STAR'ING BANK i 



"E^:s^ exerciser 



J05 



rAC'iii £r.'3£i l>5EP-7b 11 rS^ PfiGE b2 



£•^52 
£-=3 
£-5-f 
£-•55 
£-156 

— v« 

- *» 

£-=3 
£^59 
£-f&': 
£-te: 

£-)t4 

£^s& 
£467 
£-159 
£-b9 
£-t'3 
£-»': 

£-17^ 
£-175 
£-76 

£-73 

2-»9G 
£-Si 
£-»32 
£-»93 
£-tS4 
2tS5 
2-)9£) 
2487 

34 OP 

^ (WW 

2489 
249C 
24^1 
24<32 
£493 
2494 
2495 
24% 
2i97 
2498 
£499 
25:0 
25: 1 
2532 
2523 

25:4 



0C55C2 
2C5506 
005512 
005514 
00551b 
003520 
005522 
005524 
:0552& 
00^30 
03553b 
005542 
005546 
005552 
30555b 
0055b2 
0055bb 
00557D 

005572 
00557b 
C05bC2 
005b0b 
305610 
005612 
305614 
005616 
005620 
005622 
00:&24 
005b30 
CC5b34 
CQSbHO 
005b44 
005650 
005654 
OOSbbO 
OOSbbe 



GC5666 
005672 



005b7b 
005702 



0057Db 
005712 
005716 
005720 
205724 
:C572fe 
005722 



31b74b 
3057b7 
001004 
0Cb31b 
00b31b 
00b31b 
00b31b 
011b27 
OOOOCC 
012767 
00**7b7 
316746 
016746 
004767 
005267 
005767 
COlCul 
000742 

Cib74o 
01b74b 
005767 
001004 
006316 
00631b 
006316 
006316 
011627 

ooooo: 

005067 
004767 
016746 
016746 
004767 
005267 
005767 
001744 
000167 



010667 
300167 



D:0bb7 

:ocib7 



0127Cb 
012727 
000000 
004567 
012201 
004567 
012102 



I— •■31; 



^1 t I t . 

0C3bQb 
177230 
177754 
303342 
1731b0 
1773b: 



All Cteto 

nnn • 1 r 



177552 
0035i-t 
17713b 
17775b 
003344 
1730bb 
I7b7bb 

177232 



175-7- 
177312 



176744 
1772:2 



0:3500 
000001 

173034 

173326 



2S: 

£!: 



n-jv 

TST 

arc 

ASL 

ASL 

ASL 

flSL 

MOV 

.yCRD 

flOV 

MOV 
MOV 
JSR 
INC 
TST 
3NE 
3R 

MO'. 

MOV 

T5T 

BNE 

ASl 

ASL 

hSL 

ASL 

MOv' 

.UORD 

ClR 

JSR 

MCV 

MOV 

JSR 

INC 

TST 

BEQ 

JHP 



.BANKS.- iP) 

PRQ3FLi 

2S 

iSP) 
.SP) 
.SP) 
kSP) 

iSP), (PC)* 
i-1,. CONST.' 

.ST3ANK,- SP) 
3f,-(SP5 
PC,. ROTO 

icAt 

ALLFLG 

JROTl 

JROTO 

.STBhNK.-iSP) 
. BANKS. -(SP^ 
PRG3FLi 
2} 

(3P) 
.SP) 
:SP) 
(SP) 

(SP), iPC)+ 
0 

.const 

PC.. USER 

.STBANK.-'SPJ 

3S,-(SP! 

PC,.R0T1 

IC^T 

ALLFLG 

SROTl 

SIXB 



:GET I OF BANKS 



: MULTIPLY 4K BANK COUNT BY 16. 
:T0 FORM 256. UORD BLOCK CCJHT 



SAVE 

CONTAINS 256. UCRD BLOCK CC.'.' 
SET CONSTANT 

GO'wkITE hLl 1 'S ThRujn rt. w^i 
GET STARTING BANK I 
GET i OF 256. UORD SLOCKS TO ! 
GO CHECK ROTATING 0 PATTERN 
INCREMENT DISPLAY COUNT 
CHECK IF RUNNING ALL PfiT£ON= 
GO TO JRCTl IF RUNNING AL- PA" 
LOOP 



GET STARTING BANK i 

GET I OF 4 K BANKS 

CHECK IF RUNNING PROGRAM 3 

BRANCH IF RUNNING PROGRAM 3 

SHIFT 4K BANK COUNT BY 16. 

TO FORM 256. UORD BLOCK COLn: 



SAVE 

CONTAINS 25b. UORD BLOCK ZZJ^ 

SET CONSTANT 

GO URITE O'S THROUGHOUT 

GET STARTING BANK M 

AND 25b. UORD BLOCK COUNT 

GO CHECK ROTATING 1 PATTE«JN 

INCREMENT PASS COUNT 

CHECK IF RUNNING ALL PATTERNS 

LOOP IF NOT RUNNING ALL PATTERN: 

GO 00 S1X8 PATTERN 



:RO!JTir€ TO CHECK MEMORY USING 3 XOR 9 PARITY PATTERN 
J3X9P: MOV SP.PARPAT :5ET INDICATOR TO UFITE PARITY =A'"E=N 

JMP i3X9 



:A^L PATTERNS 
iALL: MOV SP, ALLFLG 
JMP J1X8 
.SBTTL PROGRAM i 3 
:THIS PROGRAM IS THE SAME AS PROGRAM I 2 ABOVE EXCEP 
iDATA BLOCKS MAY BE URITTEN 



:SET INDICATOR 

: BEGIN UITH 1X8 TEST PATTERN 



3CS. I ■■^C- 



^•RG3: MOV 
MOV 

PPG3FLG:.U0RD 
JSR 
PRG3M 
JSR 
BANKS 



iSTKPTR.SF 
»1,(PC)+ 
0 

RS.iPRINT 
R5.JPRINT 



SET STACK PTR 
SET PROGRAM 3 FLAG 
CONTAINS PRG3 INDICATOR 
GO TO PRINT ROUTINE 

:G0 TO PRINT ROUTINE 



MfcK 



K05 



£539 

25iC 
2511 
2512 
2513 
2514 

251E> 
2517 
2519 
2519 
2520 
2521 



2522 

2523 

2524 

2525 

2526 

2527 

2528 

2529 

2=30 

2531 

2532 

2533 

2534 

2=35 

2536 

2537 

2538 

2539 

254C 

2541 

2542 

2543 

2544 

2545 

2546 

2547 

2548 

2549 

2550 

2551 

2552 

2553 

2554 

2555 

2556 

£557 

2558 
scca 



005740 
005744 
005750 
005756 
30576C 
005764 
005770 
005772 
005776 
006000 
006006 
006012 
006014 
006020 
006022 
006026 
CQ603G 
006036 
006042 
005046 
006050 
006054 
006056 
006062 
Q06064 
006070 
0C6074 
006100 
0C6102 
006106 
006110 
006112 
006116 
006120 
006122 
006124 
006130 
006134 
006140 
006144 
006146 
006150 
006154 
006162 
006170 
006174 
006176 
X62Q0 
006204 
CG&Slw 
2Q6=:2 



012706 
005037 
012737 
000005 
012707 
004567 
312262 
004767 
000000 
016767 
006037 
103406 
004567 
012161 
004767 
000000 
012767 
016703 
0167C4 
001020 
022703 
101412 
005037 
103431 
004767 
004767 
004767 
000422 
022703 
101017 
010302 
012700 
006204 
006003 
077003 
004767 
310337 
042702 
052702 
000401 
010302 
016700 
012737 
052737 
006037 
103014 
011246 
004767 
004567 
015020 
06=767 



000500 
006520 

001115 0D:004 

005764 
172770 

003570 

003634 200236 
177570 

172740 

003540 



JflP 



PRG2A 



;G0 TO PRCGRQM 2 



.5BTTL PROGRAM t 4 
;THIS PROGRAM MAY BE USED TO RERD- WRITE fl USER CCMTANT INTC Ki- 
: MEMORY LOCATION 
.*RG4: MOV ISTKPTR.SP 
atPEFLG 



006030 
177734 
000176 

C20QCQ 

177570 

172214 
000254 
172230 

160000 
000006 



000714 
172342 
177700 
G20000 



177652 
005740 
000100 
177570 



173542 
172550 

GC0302 



iADRSO: 



174330 



iCONST: 
FRG4fi: 



13: 

lOi: 

2J: 



00C060 
177560 



3S: 
45: 



« 1 t WWW 



MOV 
vLR 
MOV 
RESET 
MOV 
JSR 
PRG4M 
JSR 
.UORD 
MOV 
ROR 
BCS 
JSR 
CONST 
JSR 
.MORO 
MOV 
MOV 
MOV 
SNE 
CMP 
BIOS 
ROR 
BCS 
JSR 
JSR 
JSR 
BR 
CMP 
BHI 
MOV 
MOV 
ASR 
ROR 
SOB 
JSR 
MOV 

aic 

BIS 
BR 

MOV 

MOV 

MOV 

BIS 

ROR 

BCC 

MOV 

JSR 

JSR 

JCRlF 

ADO 



lERRTRP.SaERRVEC 

•.+4. PC 
R5, SPRINT 

PC,RECD 
0 

.1617,.EXTAD 
SkSkR 
PRG4A 
R5, SPRINT 

PC,RECD 

0 

•PRG»*fl,PERSTR: 
SAORSC R3 
.EXTAD,R4 
lOS 

120000. R3 
IS 

SiSUR 
3S 

PC.SSAVR 
PC RELOCP 
PC.SRESTR 
3S 

1160000, R3 
3S 

R3,R2 
16, RO 
P4 
R3 

R0.2S 
PC,LDMMO 
R3.2IKIPAR1 
ll^77Q0.R2 
120000,^2 
4$ 

R3.R2 
SCONST.RO 
liPRG4.SiTKVEC 
ilQQ.iiTKS 
S«5UR 
5S 

(R2).-(SP) 
PC.02A 
R5. SPRINT 

•2.SA0R5U 



;SET STACK PTR 

; CLEAR PARITY ERROR IHSICAT CPS 



; RELOCATE BACK TO FIRST 
!G0 to PRINT ROUTINE 



41^ 



SCNTAINS ADDRESS BITS ; 15-C 
GET EXTENDED ADDRESS BrS I 
CHECK SWITCH 0 
GO TO PRG4A IF SET 
GO TO PRINT ROUTINE 



CONTAINS USER CONSTANT 

SET RESTART ADDRESS ON PAR ERR 

GET ADDRESS BITS <15-0> 

GET ADDRESS BITS U7-16> 

BRANCH IF MEM MGMT REQUIREO 

CHECK IF ADDRESS IS LESS ^HAN 

BRANCH IF IT IS NOT 

CHECK IF READING 

BRANCH IF READING 

GO SAVE REGISTERS ON THE STPCh 

GO RELOCATE PROGRAM 

RESTORE REGISTERS FROM SThCk 

GO TO 3S 

CHECK IF MEM MGMT WILL BE REQ- 
GO TO 3$ IF NOT REQUIRED 
GET ADDRESS BITS <15-0> 
SET SHIFT COUNT 
SHIFT 18 SIT ADDRESS 
6 PLACES RIGHT 



GO SETUP MEM MGMT 
SET KIPARl 

CLEAR ADDRESS BITS US-fc 
SET ADDRESS REGISTER 
GO TO 4$ 

SET ADDRESS REGISTER 
GET USER CONSTANT 
SET KEYBOARD INTERRUPT 
SET IE BIT IN KEYBOARD 
CHECK SWITCH 0 
BRANCH IF NOT SET 
PUSH DATA TO BE TYPED ON-'O 



VECTOR 
CSR 



jO type DATA 
GO TO PRINT ROLTIHE 

STEP ADDRESS 



5TA 



• — _ - -( 

- J - 



£E33 
c5i^ 
25£>5 

£573 
==74 
2575 
£57b 
£577 

2579 
£579 
2530 
2581 
2532 
2583 
2584 
2595 
258& 
2587 
25S8 
2599 
259"] 
2591 
2592 
2593 
259M 
2595 
2596 
2597 
2598 
2599 
2&00 
2&Q1 
2&02 
2&03 
2&0M 
2&05 
2b0& 
2607 
2608 
2609 
2610 

2611 
sc. 12 

2£l3 
-t'4 

2616 



:£fK ^"v"'?^ e\ep::5EF 



LOB 

''m:>:: £7.'3£^ 10-=Ec-7a 11:59 SniE 64 



CC6223 
306224 
006226 
006230 
006232 
006234 
006236 
CC624Q 
026242 
005244 



006246 
006250 
006252 
006254 
006260 
006266 
006270 
006272 
006274 
006276 
006300 
006302 
0063C4 
006306 
006310 
006312 
006314 
C063I6 

006320 
006322 
006324 

006326 
006330 
006332 
006334 
006336 
006342 
006344 



305567 
000701 

012203 
020003 
001401 
104400 
005742 
000771 
0C00C3 



CI25G:i 
011502 
010203 

062703 017776 

012737 005330 CCCOO"^ 

005004 

005723 

012022 

020203 

001375 

011503 

020203 

001413 

024042 

001774 

005702 

001403 

104400 

000000 
000767 
000000 

000777 
022626 
005104 
000240 

012702 0027=4 

061502 

012512 



fiUC . 
9R 

51: flOV 
MOV 
CMP 
BEQ 
HLT 

5J: TST 
BR 

.EXTflO: .UORD 
.SSTTL 
.SBTTL 

:ROUTINE TO RE! 

^ELOC: MOV 
flOV 
MOV 
ADD 
10V 



;URITE USFR CChSTP'iT I 
:GET DflTft URITTEN 
: CHECK DATA 



.EXTfiC 
PRG4fl 
R0.(R2) 
;R^)+.R3 
R0.R3 
5S 

; REPORT ERROR 
-(R2) ; RESTORE ADDRESS 

5S ;LOOP BACK 

0 : CONTAINS EXTENDED hDD'5£5= BITS 

PROGRAM SUBROUTINES 
RELOCATION ROUTINES 
.OCATE PROGRAM CODE 

;GET FROM ADDRESS 
:GET TO ADDRESS 



11: 



2i: 



3S: 

4S: 
5i: 



006345 000205 



006350 012700 020000 

206354 012737 0Q0006 

006362 062700 020000 

006366 000261 

006270 005710 

006372 103373 

:2c274 012737 ZClllb 0030C4 



TST 
MOV 
CMP 
BNE 
MOV 
CMP 
EEO 
CMP 
BEQ 
TST 
BEQ 
HLT 

HALT 

BR 

HALT 

BR 

CMP 

COM 

NOP 

MOV 

ADD 

MOV 

RTS 



(R5)+.R0 
(R5).ft2 
Rc.R3 
#1^776. R3 
i4S.3»^RRvEC 
R4 

;R3) + 

v'RO) + , :R2) + 

R2,R3 

IJ 

(R5).R3 

R2,R3 

5S 

-(R0).-.R2: 

2S 

R3 

35 



25 



CSP)+.(5P)+ 
R4 

•REL0CF.R2 

(R5),R2 

CR5)+.(R2) 



; MOVES 4K 
SET TIME OUT TRAP 

; CLEAR RELOCATION SUCCESSFL- INDICATCR 
CHECK IF MEMORY IS AVAILABLE 
•RELO'^ATE 

I RELOCATION COMPLETE' 



; BRANCH IF DONE 

I CHECK THAT DATA UAS RELOCATED PROPERLY 

: CHECK IF RELOCATING BACK TO QOOOOC 

; ERROR! CANNOT RELOCATE PROGRAM CODE 
;T0 UPPER MEMORY BANK PROPERLY 

: CONTINUE RELOCATING AT YOUR PERIL 
; ERROR! CANNOT RELOCATE CODE BACK TO 
;T0 000000 PROPERLY 

: RESTORE STACK PTR 



;GET ADDRESS OF RELOCATION FACTOR 
ADD FACTOR 

RELOCATED RELOCF NOW CONTAINS RELCCATIC.N 
FACTOR 

RETURN, R4=-l IF NO RELOCATION 



; ROUTINE TO RELOCATE PROGRAM CODE FROM ORIGINAL POSITION iO-4K) TO 
TOP OF MEMORY. 

120000, RO :SET UP TO SCAN FOR TCP OF MEMORY 

•ERRVEt+2.aiERRVEC 



ftELOCP: MOV 
MOV 

IS: ADD 
SEC 
TST 
BCC 
MOV 



120000, RO 

(RO) 
IS 

«ERRTRP.a»ERRVEC 



INCREMENT SCAN ADDRESS 
SET TIME OUT INDICATOR 
CHECK FOR EXISTANT MEMORY 
•C MILL BE CLEAR IF MEMCRY EMS'S 



re^::h'::.n c:-':^e= 



M05 



lC-5E0-rb 11:5<5 ^hGE fe; 



£t:9 

2650 
2&cl 
2dS2 
2623 
2b24 
5&25 
2&2& 
2&27 
2628 
2E)29 
2b3G 
2b3l 
2632 

WW WW 

2634 
2635 
2636 
2637 
2638 
263«3 
2640 
2641 
2642 
2643 
2644 
2645 
2646 
2647 
2648 
2649 
2650 
2651 
2652 
2653 
2654 
2655 
2656 
2657 
2656 
2659 
2660 
2661 
2662 
2663 
2664 
2665 
2666 
2667 
2668 
2669 
2670 
2671 
2672 



CCb'.C2 
:C6406 
206412 
0C6416 
0C6"20 
006422 
006436 
006430 
006434 
206440 
006444 
006450 
006454 
006456 
006460 
206464 



006466 
006472 
306476 
006500 
006502 
006504 
006506 
006510 
006514 
006516 
006520 
006521 
006522 
006530 
006536 
006540 
006544 
006546 
006552 
G06556 
006564 
006566 
006570 
Q06574 
006576 

006600 
006602 
006604 
006610 
006614 
006616 
C06622 



16270C 
010067 
004567 
000000 
000000 
004567 
012301 
C16746 
062716 
004767 
011667 
066706 
012716 
000000 
066716 
000207 



010067 
012700 
010120 
010220 
010320 
010420 
010520 
004567 
006676 
005027 
000 
000 
012737 
012737 
005002 
005767 
001407 
004767 
105237 
012737 
012200 
000776 
110667 
010003 
104400 

000002 
000240 
005067 
012706 
000005 
004767 
000177 



D200CD 
000006 
l7-b3C 



172332 

177764 
012356 
173302 
00C0C6 
177744 



177734 



177710 
000500 

000122 
173540 



2i: 



31: 



5JB 

10V 
J5R 

OOOOCO 

.UORO 

JSR 

RELCCM 

MOV 

ADC 

JSR 

MOV 

POD 

lOV 

.UORD 

ADD 

RTS 



•20000. R2 

RD.2J 

RS.RELO: 



R5. SPRINT 

2S.-ISPJ 

•REL24K. (SPj 

PC.02A 

(5P).5J 

2J.Sf^ 

;PC)+, (SPj 

0 

2J,(SP) 
PC 



ftDJJST TC LQ£T EXiS'ftrr 4K 

PASS RELOCflTION ftSDRESS t: s£^:: 

RELOCATE PRCGRflM 

FR01 ADDRESS OOOOCO 

"0 LAST 4K BANK 

GO TO PRINT ROUTINE 

PASS TO 02A ROUTINE 

SET UP RESTART ADDRESS 

TYPE RESTART ADDRESS 

SAVE RETURN ADDRESS IN 21 BE-w/ 

RESET STACK PTR 

GET RETURN ADDRESS 

CONTAINS RETURN PC 

ADJUST RETURN PC 



000173 
006664 



172244 



006570 000114 
006626 000004 

172206 

000272 
172301 

007142 000250 



.SBTTL 
WHEN A PARITY 
DRESS CAUSING 
HALTS WITH THE 
PARSRV:M0V 

MOV 

MOV 

MOV 

MOV 

MOV 

MOV 

JSR 

PARERR 
CLR 



PARITY ERROR SERVICE ROUTINE 
ERROR IS DETECTED THIS ROU'^INE SCANS MEMORY FOR 'HE hC- 
THE PARITY ERROR. WHEN THE ADDRESS IS LOCfl'EC THE RCJ'I 

ADORESS+2 IN RO. TO CONTINUE AFTER THE ERPCR PRESS CCN 

RO.SAVRO ;SAVE RO IN SAVRO 

gSAvR0-^2.R0 

R1,(R0)+ 

R2, (R0)+ 

R3,(R0)+ 

R4,(R0)+ 

R5.iR0)+ 

RS.JPRINT 



PEFLG: 
PENFLG: 



IS: 

2J: 



3S: 



-BYTE 
.BYTE 
MOV 
MOV 
CLR 
TST 
BEQ 
JSR 
INCB 
MOV 
MOV 
BR 

MOVB 

MOV 

HLT 

RTI 

NOP 

CLP. 

MOV 

RESET 

JSR 

JMP 



(PC) + 

0 

0 

l2S,aiPARVEC 
•4S.3MERRVEC 
R2 

MMAVA 
IS 

PC.LOMMO 

StKIPDRO+l 

•MMABTO.a»MMVEC 

(R2)+,R0 

IS 

SP, PEFLG 
RC,R3 



PEFLG 
•STKPTR.SP 



PC^.MAMF 
aP&RSTRT 



;G0 TO PRINT ROlTINE 

: CLEAR PARITY ERROR INDICATORS 

:NOT O'O =PflR ERR/NO PAR ERR 

;N0"^ 0/0=PAR ERR DETECTED/NOT DE^'EC'E: 
;SET PARITY ERRCR TRAP 
:SET TIME OUT TRAP VECTOR 

: CHECK IF MEM MGMT IS AVAILABLE 
; BRANCH IF NOT AVAILABLE 
:SET UP MEM MGMT 
; ALLOW FULL 4K PAGE ADDRESSING 
I SET MEM MGMT ABORT TRAP VECTOft 
:SCAN ALL ADDRESSES 

-.SET PARITY ERROR FOUND INDICA'^CR 

PARITY ERROR! ADDRE5S+2 IS IN R2 DA'A 
IS IN RO 
CONTINUE SCAN 

INSERT HALT INST TO EXAMINE PARIT> RE 
CLEAR PARITY ERROR INDICA'ORS 
RESET STACK PTR 

GO ENABLE PARITY ERRCR DETECTION 
RESTART SELECTED PROGRAM 



: SERVICE RO-TINE IF PARITY ER^CR NOT DETECTED ON SCAN 



NOB 



L£iN '^E^'C«<^ EXERCISER nflCYll 27. '3H 
FhlRITl ERROR SERVICE RXTI.NE 



2h77 
2fe78 
2b7g 
2&80 
2b8I 

2&33 
cb84 
Sb85 
3b3b 
2b87 
2bS8 
2b3<3 

2bqo 

2b31 

2b92 

2b<33 

SbSM 

2b<35 

2b<3b 

2b97 

2b9S 

2b99 

27Q0 

2701 

2702 

2703 

2704 

2705 

27Db 

2707 

2708 

2709 

2710 

2711 

2712 

2713 

2714 

2715 

271b 

c717 

2718 

2719 

2720 

2721 

2722 

2723 

2724 

2725 

272fc 

2727 

2728 

2729 



00&b2b 
00bb32 
00bb34 
00bb40 
00b644 
OObbSO 
OObbSH 
OObbSb 
OObbbO 



00bbb2 
00bbb4 
OObbbb 
00bb70 
00bb72 
00bb7'^ 

00bb7b 
00b704 
00b712 
00b7r 
00b724 
a0b732 
00b740 



00b744 
00b752 
0Db754 
00b7b0 
00b7bb 
00b774 
007002 
00700b 
007012 
007014 



00701b 
007020 
007024 
00702b 
007032 
007034 
0Q703b 
007042 



007044 
207046 



i:-5EP-7b 11:59 FfiiE tb 



I057b7 1776bb 
001363 

ClbbOa C0C0C4 
lb2702 000002 
Il0bb7 177651 
004Sb7 172104 
00b7l7 
104400 
000750 



300000 
000000 
000000 
000000 
000000 
000000 



005015 
054524 
051117 
lib 
052517 
02011b 
005015 
00b7-»4 



172100 
000114 

032737 
001033 
01374b 
012737 
012737 
012737 
012700 
Q12702 
005027 
000000 



C40520 
042440 
005015 
052117 
04211b 
041523 
003 



000040 

000004 
00000b 
00b4bb 
000340 
172100 
OOOQOi 



0002b2 

012720 000001 
102402 

0502b7 177762 

Q0b302 

103370 

012b37 020004 
000207 



000240 

005767 171700 



044522 
051122 
000 
043040 
047440 
047101 



^570 



000004 
000114 
CQQlifc 



41: 



-STS 
BNE 

flOV 
SUB 
MOVB 
JSR 

NOFIND 
HLT 
BR 



PEFLG 
3S 

4(SP),R2 
«2.R2 
SP.PENF.G 
R5, SPRINT 



3S 



:THE BELOW 6 UORDS CCNTfllNS THE 
PARITY ERROR OCCURRED 



: BRANCH IF PARITY ERROR WftS 
: DETECTED ON SCAN 
:GET PC AT TIME OF ERROR 
:BACK IT UP 

;SET IND = NO PAR ERROR DE'ECTE: C'i SCAM 
:G0 TO PRINT ROUTINE 

; ERROR! PARITY ERROR NO"^ DETECTED C"' SCA' 
SAVED CONTENTS OF RQ-R5 UHEf< THE 



^AVRO 
SAVRl 
5AVR2 
SAVR3 
5AVR4 
SAVR5 



.UORD 
.WORD 
.UORD 
.UORD 
.WORD 
.WORD 



0 
0 
0 
0 

C 

0 



PARERR: .ASCI2 aS^ < 12^ 'PARITY ERRORS 15^ ' 12^ 
NOFIND: .ASCIZ 'NOT FOUND ON SCAN' < 15x12' 



.EVEN 

:ROUTINE TO ENABLE PARITY ERROR ACTION ON MA/MF PARITY riEMORIES 

PARC5R=172100 :ADDRESS OF FIRST PARITY REGISTER 

PARVEC=114 ; PARITY ERROR INTERRUPT VECTOR ADDRESS 



.MAMF: BIT 
BNE 
MOV 
MOV 
F10V 
MOV 
MOV 
MOV 
CLR 
.WORD 



t40.a«5WR : CHECK IF PARITY ERROR DETECTION IS '0 

DIS^»AR :BE ENABLED. BRANCH IF NOT TO EE ENABLED 

atERRVEC.-(SP) :SAVE ERROR TRAP VECTOR 

•ERRVEC+^^aiERRV^C ;SET TIME OUT TRAP TO RETURN^; VIA R^ 

•.PARSRV.SlPARVEC !SET PARITY ERROR TRAP VECTOR 

•340,2tPARVEC+2 ; PRIORITY LEVEL 7 ON TRAP 
-g^oArn nn Q£j pjRST ADDRESS OF PARITY REGISTER 



FARAVA: 



lPARCSR,RO 
•1.R2 

(PC) + 
0 



: CLEAR AVAILABILITY INDICATOR 
; CONTAINS AVAILABILITY INDICATOR 



ENABLE ALL AVAILABLE PARITY REGISTERS 



ij: 



2S: 



DISPAR: 



SEV 
MOV 
BVS 
BIS 
ASL 
BCC 
MOV 
RTS 



•1, (R0)+ 
25 

R2.PARAVA 

R2 

IS 

(SP)+.2»ERRVEC 
PC 



:SET TIME OUT INDICATOR 
;SET ACTION ENABLE IF AVAILABLE 
BRANCH IF NO PARITY AVAILABLE 
:SET AVAILABLITY INDICATOR 
: SHIFT INDICATOR 

; RESTORE ERROR TRAP VECTOR 
: RETURN 



.SBTTL MEM MGMT ROUTINES 
:ROUTINE TO INITIALIZE MEMORY MANAGEMENT REGIbTERu 
LDMMO: NOP 

TST MMAVA 




BOb 



11:59 Wi£ s- 



li 



atiRC ::i5ftB' E rtEr rir* 

iI.SiSR: : enable *!ir" 

5ERWCE FOP uRITE 2C*N 

•^QC.atKiPHR: 



2lSR2..SF 



StSRC 



:::3HaLE -e- 



UP mnZ-ii «HNHi£"^.NT FCR PAT'CRN TEE'S 
R2 ::HE:k- IF TEsTlNS 3HNk t 

:Exr IF 3flN*. • C 



ss 

II 

R2 
R2 
R2 
R2 

p: 



: BRANCH IF fEf* •fG.'l' A*.A:.h2-E 

:ir:«s' ad:re55 



:RET'JR> 

'^.fif.Z INITIAu 5£' 



FC.LDMflC 
R2 
R2 

R2.3IKIPAR2 
i26q,R2 
R2 5ik^PAR3 

•26a*256. -4aQ+'JP*Rl..itkIPCR2 
■200*256. -HCC*i,P*RU. S•^ IPDRS 
aiKlPORH 
•H0000.R2 

•fififiBTS.aiMT'.'E: 



:5ET k:?:R2=Ru -P KZ 3. 
:5£' ^IPDRJ=Ri^ -P iZZ 3. 



CQb 



"A:^:! 2". -3= li>5Eo-r6 1I:59 PALE fe2 



=s:7 

2511 

AW • to 

toto * * 
a« * • ^ 

es.3 

2S:a 

2517 

2513 
52*5 

to^ • « 

232- 



to to to3*« tototowto • 




3C"3&b 

to«# ~toW 



2^58 
2*3- 
2-59 
2-5^ 

to ' • « 
to • to 

2-?-» 



=-3a 

to to 

279? 

toto to • 

25C2 

toto«#to 
toto*# » 

3Q-r 



2i: 



R.'S 



PC 



52737 2C£15C 
C137:5 :775?& 
::2737 02"- 



i723H'* 
:-23HS 



:R:jTINE rO service 8 XOR 13 ABORTS 
fr!rtfiT2: NC~ 

■m8^&k!par2 



flOV 
RTI 



:SET RETLRM TO INSTRijC::'* T-6' 

•.ENABLE ran rwi" 



H3. 



jw7"*lC 

2S:-5 X7M2a 
027424 
2C7M3C 
027432 

207434 

:2r43fc 

2074«0 



:27-'^46 
227452 
227452 

227454 
227uCb 
22 1 *^B2 
227462 

327464 

o!!7H?s 

274'^ 



0C7474 

207476 

r.nT 



to *&&«#3 
2I662£ 
C2H767 

212205 
205105 

005122 
C25125 
212724 

2I2IS 

012022 
<;:2S22 

312222 
212522 
012222 
012522 





!275l5 



o:co2| 

212522 
0Q53Q4 

ii 

mi 



.S9TTL 1 XOR a ROUTINES 
RDUTINE TO URITE 1 XOR 3 WORST CASE NOISE PATTERN 



nnnn">r 
nnnr.nu 

177614 



CALL: 



• va. 



2S: 



to5« 



MOV 
fOV 

:sR 

nov 

JSR 

nov 
cort 

con 
ccn 

KOV 
MOV 

rev 
f«:v 

nov 
nov 
r<cv 
nov 



nov 
nov 
ficv 

nov 

MOV 

ncv 

MOV 

DEC 
5NE 
DEC 
3NE 

nov 
nov 

RTS 



BANK t.-CSP^ 
BLKCNT.-iSP^ 
PC. 1X6 

2(3Pl.R3 
4(5P),R2 
PC,STftK2 
■-1.R2 

R5 




Rg.-.R2^* 
R5.(R2)* 
R0.(R2:* 
R5.(R2)* 

R0.(R2)+ 
R5.CR2;* 
RQ,(R2H 

R5.;R2<* 

R4 
3S 
R3 
2S 

•:SP;*.iSF. 

i5P)*.vSP 
PC 




:PUSH STARTING BANK I ON Tf^E =' 
:PUSri 128. WORD BLOCK CCLN' CN 



WORD aLCCfS t: 

BANK • 
_ _ MEM MGKT 
:SET UP DATA REGISTERS 



:SET 126. uofic c:l;nter 

:WRI7E 123. ^0^23 



hvi< 
'HE 



CECREMENT 123. WCRC COwN'EO 
DECREflENT SLOCk CCLNT 
ADJUST STACK 
RETURN "0 Cml^ER 



:F:-'IME TO CHECK 1 XOR S ^A'^^ZR'i WRITTEN ASOvE 



W ^ ^to « 



£5nfc 

=£52 

=254 
=356 



KrssH 

:275fe2 



=£5r 2D75bM 
2359 
2S5? 
£3e: 
256: 
2562 
2S&3 
2864 
2S55 
2566 
2867 
2S63 
2S69 
2872 
2871 
2872 
2573 
2874 
2875 
2876 
2877 
2878 

2§8Q 
2881 
2882 

2886 
2887 
2888 
2889 
=892 

tOQ- 

2992 

2593 

=39- 
zzzz 



227572 
2C7S74 
007576 



327602 
007604 
2276C6 
207610 
027612 
007614 



007620 

007626 
007632 
027635 



204?67 
004767 



100431 
005100 
312705 

005100 
012223 
020003 
021423 
005046 
004767 



205100 
012203 
020003 
001403 
X5C46 
004767 



005120 
012203 
020203 
001403 
005046 
004767 




207654 

007662 
2C7S66 
027570 
227674 

::7-:2 



005305 

005367 
001334 
016602 
20'*767 



nns* an 

*«»w 



177H72 
171170 



171354 



171326 



307636 005100 

207640 012203 

007644 

2S7646 

007650 004767 171322 



171070 

002004 
177340 



li: 

2S: 
3S: 



■V • 
.\j t 

JSR 



NOP 
JSR 

MOV 
^OV 
JSR 
CLR 
TST 

:cn 
•10V 

:rip 

8E: 

CLR 
JSR 



COM 

nov 
cr«P 

BE3 

CLR 
JSR 



nov 

BEQ 
CLR 
JsR 



"•ttt? "fn""!!- '"-"C' -5. 



•-t-str "712'= 

•* 4««Vto 



COM 

ncv 
cnp 

9EQ 
CLR 
JSR 



DEC 
9f€ 
COM 
DEC 
BNE 
MOV 
JSR 
MOV 
ASL 



DOB 

i:-£EP-76 11:59 PhiE E9 



SANK B.-^Eo- 
3LkCNT.-.SF 
PC... 1X8 



:PjSh 128. ^ZK s.::^ '.iwT :'i 



PC.CkSUR 
2(5? 5. COUNT 
4.SP).R2 
PC.STMM2 
RO 

ICOUN' 

.+4 

RO 

•32.. R5 

RO 

vR2>.R3 
?0,R3 

-.3P) 

PC. ERROR . 



RO^ 

CR2H.R3 
R0,R3 

-(SP5 
PC.ERRCR 



RO 

(Rc)*.R3 
R0,R3 

-iSP) 
PC.ERROF 



(?c>.R3 
RC,R3 

.♦io 

-(SP) 
PC.ERRCR 



R5 

COUNT 
21 

4fSP),R2 
PC.STflM2 
2 (sP). COUNT 

icojnt 



;t BlOCk count 

[T STftRTING BfiNK f 



iCJHECK SUITCH REilE'tC 

GL . 

GO SET UP MEM MCMT 
CLEAR TEST WORD 
IF BIT 15 OF ICCUN' =1 '-£'i =i-'£=- 

is complemented 
:gmplement test uorc 

SET 128. tJORD CCLN'En 



:GET TEST DATA 

: COMPARE UITH CHECK MCfiC 

:PU5H FAKE STATUS ON T^E S'^^y 
:ERROR! MEM DATA :R3) = T££' ZA' 
:;RQ). AD0RESSriR2)-2 

:iET TEST DATA 

: COMPARE UITH CHECK UORD 

:PUSH FAKE STATUS ON THE S'AC-. 
.-ERROR! MEM DATA :R33 NOT = 'EST 2^' 
:(R0). A0DRE5S=;R2)-2 



:GET TEST DATA 

;C0MP*^ UITH CHECK WORD 

:PUSH FAKE STATUS ON THE S'^ACK 
: ERROR! MEM DATA (RO^ NOT = T£: 
:iRO!. A0CRESS=(R2^-2 



GET TEST DATA 

COMPARE UITH CHECK UORD 



PUSH Fl 
ERROR! 
iRO), 




STATUS ON THE S'ACK 

;n DATA :r3; not = test 

~^SSs(R21-2 



DECREMENT 128. UORO COUNTER 

COnPLEMtNT CHECK UORO 
DECREMENT BLOCK COUN"' 

GET BANK t 

;ET f vF 128. UORO BLOCKS TC ::.»?F-ErEN^ 



•*£r:«5^ £ L^rAiP 



EOb 



2 :2230fe 












lOS 

I'* 


:::'*F^E1£NT Pm^TEP'< 


COn 
COM 
DEC 


■R2^* 




|ne 

DEC 
BNE 

T5T 

sre 

nuv 

nov 

RTS 


§1 

COUNT 
50i 
ICOUN' 
IDI 

'CB*^ CO 

PC 





SBTTL 3 X'^R 9 RjU^'NES 
SCJTINE'TC write 3X0R9 WCRSt" CfiSE NCI5E T^ST FftTTEO.N 

" :PUSH iT«TlN5_BAW.t :m £T-i> 



.3X9: 



l733Bb 



2CCH3: 



:s: 

2i: 



QC5304 
C0I3E& 



nov 
nov 

JSR 

no.' 

JSR 
CLR 

nov 
con 

TST 
SEQ 

nov 
nov 

nov 
nov 
nov 
nov 

nov 
nov 
nov 
nov 

nov 
nov 
nov 
nov 

nov 
nov 
nov 
nov 

CEC 
BNE 

con 



BANK l.-i5P^ 
BLKCM.-fSP5 
PC..3X^ 

4.SPj,R2 

PC.STnns 

RC 

RC,R3 
R3 

PflRPfiT 
li 

•HOl.RC 
•ib..RH 

R0.CR2)* 
R0.(R2)+ 
R0.iR2)+ 
RO,(R25+ 

R3, CR2)+ 
R3.CR2)+ 
R3.(R2;+ 
R3,iR2)+ 

R0,(R2)+ 
R0.(R2)+ 
R0.iR2)+ 
R0.(R2> 

R3,(R2)+ 
R3.(R2'* 
R3. :R2;+ 
R3.(R2!+ 

R-* 
2S 

RO 



•PUSH 256. UORD BkjwK 
::«LL ROUTINE 

cuE" STARTING BANK i 



jRD iO) AND R3 >-r 1= 
: BRANCH IF PARITY fCrCP.v FA'' 
:NCT TC BE WRITTEN 

:UR!TE PARITY 3X9 PhTTEBN 
:EA:h loop writes 2Sfe. ^wF:3 



FOb 



£555 

2957 
2558 
2955 
2%2 
2%1 

2563 
2%4 

•566 
2567 
2569 
2565 

25-: 

m 

2573 
25"-* 

2576 
ra— 

c47S 
2579 



sqas 

to JMto 

saat 

to 4to«» 

295»* 
2595 

2956 
aao- 

to 

aaas 

to ^toto 

=aas 

to «to « 

saa- 

2551 
=552 

to « #w 

299-* 
2555 
2596 
=997 
2998 
2999 

toto«i*to 

toto«^ * 

3::2 

toto to * 

•'"'"5 

^toto& 

---1-7 



« - J - 

f:: 


3 \:9 5 r:ltin£= 




27 '32 1 


iC-5EP-76 


313363 
9*w*<66 


3351G3 

335< 6> « j3w 

canoa 




3EQ 


R3 

PARPAT 
3S 


213370 
C13C74 
ClClOQ 

ni^ios 


00^* WtotoW*^ 

C3S3fe& toOtoCto'to 

Xi34l 

012616 

WAtoto*0 


3i: 


J5R 
DEC 

src 

10V 
RTS 


«»:..XCR39 
IS 

iSP) + . HP) 
.£P)+..SF' 
PC 



r • 1 n 

to* AW 

3:ciiH 
CIC116 

m 

C1J126 
210132 
C1213H 
CICIHC 
312142 

2i:;44 
5i5i5C 

3i2r" 

to*WA 

212164 

• t 
to* to« ■ w 

513174 



"i-t 



-'•ara 

to * tototo 

213212 
^12214 

^i2li2 
210226 
213230 
212232 

::2242 



r « to to* 



: 12244 
:ijc50 



232702 323212 
0C1**04 

032722 221323 
Si407 

032722 321322 
001404 

005767 173634 
J nnnnu 

10041C 

205767 17057-? 
100005 

C1275Q 17777- 
2C0401 

012702 223431 
17777- 




totototo 'to 

224767 2314^4 



316604 322332 

016602 222C04 

004767 177223 
2Q5QQ0 



^67 170516 
IQOOQl 
005^ 

01270S 20C122 

005767 173124 
201422 

X47fe7 177642 



: BRANCH IF PftRITi ^rZf>\ FATTEC: 
;HOT TO BF WRITTEN 

:G0 i£T CONSTANTS 

:DECRErCNT 256. .40RC BL'.Cr 'IJ- 

: ADJUST S'ACK 



: ROUTINE TO SET C0.NSTANT5 ^CR iJRriNi/CHECklNi 3 /CR PA^^'ESS 
.•PARITY, 



.X0R39: 
,3151: 

> to * w to • 



.3135: 
•DCCnP: 

.3NCR»1: 



BIT 
BEO 
3IT 
BEQ 
BR 
SIT 
SEO 
.3NCT9: TST 
SPl 
BHI 
TST 
SPL 
MOV 
MOV 
RTS 
MOV 
fICV 
RTS 



•1Q.R2 

.3lSc 

«1020.R2 

.3N0T^ 

.3IS5 

il002.R2 

.3IS9 

ICCUNT 

LOCOMP 

LDNORM 

ICCUNT 

LDNORn 

i-l,R2 

•40i,R3 

PC 

•42i.RC 

•-l,ft3 

PC 



: ROUTINE TO CHECK 3 XOR 5 wORS 



:CALL: HOV 

: nov 



.3X9: 



J5R 

NO? 
JSR 



BPNKi.-(SPi 
BLKCNt.-(SP) 
PC,.. 3X9 



FCCKSWR 



i CHECK ;mORST CASE PATTERN 



iC- 
li: 



2i: 
3S: 



nov 

J10V 
JSR 
CLR 
TST 
BPL 
COM 

nov 

TST 
BEO 

JSR 

nov 



2;SP1.R4 
4:SP>.R2 
PC,STf'ri2 
RO 

ICOUNT 

.+4 

RQ 

164., R5 

PARPAT 
30S 

PC..X0R35 
iR2.*.fi3 



CHECK BI' 3 
BRANCH IF BIT 2 = : 
CHECK BIT 5 
BRANCH IF BIT 5 =2 

CHECK sr 5 

BRANCH IF 0 

CHECK IF NORMAL OR CCMP.E^'t.N' 
GC LOAD COMPLEMENT CONSTANTS 
GO LOAD NORMAL CONS'^ANTS 
CHECK IF NORMAL OR C0.1PLE'*£N' 
S: LOAD NORMAL CCNSTAN'S 
SET COMPLEMENT CONSTANTS 

RETURN 

^OAD NORMAL- CONSTANTS 



CASE NOISE PATTERN 
;°USH STARTING BANK I CN 
;ANO 256. UORC BLOACK CC^T 
CA^. ROUTINE 



3 



iGO ^ 



HECK SWiTCr S£i:5"'E= 



:3ET 256. BLOCK U0R3 CC-^' 
:3ET FIRST BANK t 
:(iO SET UP rSM MGMT 
:SET CHECK WORD 

;IF ICOUNT IS NEC AM CH£C^:^3 C 
:LEMENTED PATTERN 
:S0 COMPLEMENT CHECK uCRC 
:SET 256. WORD COUNTER 

: BRANCH IF PARITY ME^CR^ 0A"E5 
:NOT TO BE CHECKED 

:G0 GET CONSTANT 

:iET ^EST DATA 



3 \:r = ' 



>. 1 . . z 



G0& 



:rc. 



li:S9 CniE "2 



•3-, 1 

to W * * 

■3'') 3 

33:3 



210302 
C1C30H 

c::306 

010310 



010314 



012203 
3200C3 

QCSO^ 
004767 



0122C3 

001403 
005:-^£ 
0047&7 



010264 012203 
010266 020003 
010273 301403 

020 5l?c74 004767 
2021 
3wce 
3023 

'3'- 37 

3529 

3:34 

■5—55 
3136 

2033 

20-0 

3041 
2042 

3-tt 
30-^5 
3C46 
2:-7 

2>3 
3051 

20S4 

2:5s 

2257 
3:59 

•5-CQ 

2061 
3062 
3063 
3064 



to 4 to J WW www 4 Wto 

to * wtoWC Wto Wto WW 

:i:334 001342 

010336 005100 

010340 005334 

C103'*2 001333 



1 



0103§4 01666? 000002 
010362 016602 000004 
010366 00i767 176646 



010372 
010374 
010420 
010402 
010404 
010410 
010414 
010420 



310430 
010432 
010434 



005000 

005767 170344 
100001 
005100 

012704 OCCiOO 

012705 CC0024 
0GS767 172746 
001402 

004767 177462 
012203 
020003 
001403 
CC50S6 



010344 032737 040000 17^57: 
010352 001514 



.1 -f 



4:J: 



CMP 
3E5 

JSR 



MOV 
CMP 
5EQ 
CLR 



flOV 
CMP 

CLR 
:5R 



MOV 

C^!P 

CLR 
JSfi 



con 

DEC 
3NE 

ccn 

DEC 
,3NE 

BIT 

ncv 

J5R 



•■to ■* «fr ^ r t * 

to to wiBM toto toto 1' to< 



;ie;k ucrst 

CLR 
TST 
3PL 

con 
nov 
nov 

TST 
SECi 
JSR 

nov 
cn? 
eEQ 

CLR 
JSR 



45: 
5i: 
ci: 



R0.R3 
.♦10 
-.5P) 
PC. ERPCR 



(R2^+.R3 
R0.R3 
.*1C 
-(5P^ 
PC. ERR DR 



(R2)+.R3 
R0,R3 

.*ic 

-liP) 
PC. ERROR 



;R2)+.R3 
R0,R3 

-(5P5 
BC. ERROR 



RC 
R5 
3S 
RC 
R4 
25 

»4C000.3tSUR 
IS 

2<SP).C0UriT 

4(5P),R2 

PC.STftK2 



:C01PARE iJITH CHECK iJORO 

:PUSh FAKF S'AT'JS OH 'HE STf.Cl' 
.-ERROR! MEM DftTfi iR3. HOT s TE 
.:R0), A00RE55s:R2.-2 

:CET TEST OflTA 

:COnPftRE WITH CHECK .JORO 

:PiJSH Ffi»(E STATUS O.N THE 
:ERRCR! nEM OftTft (R3, fOT = 
;:R0>. flDDRESS=CR2>-2 

.-GET TEST DflTfl 

: COMPARE WITH CHECK JCRD 

;PUSK cftKE STATUS ON 'HE S' 
; ERROR! MEM OftTP (R3: ■- - 
|(R0), fiDDRESS=(R2»-2 

:GET TEST DflTfl 

:CCnPflRE WITH CHECf WCRO 

•.PUSH FAKE STATUS ON THE S'^Z' 
: ERROR! MEM DftTfi :R3) NCT = 'E 
;(RC:. ADDRESS: :R2) -2 



iCCnPLEMENT CHECK UORD 
lOECREMENT 256. -4jRD CCw'^TE? 

iCCnPLEMENT CHECK wCRO 
: DECREMENT BLOCK CCL'NTEP 

:LO:f cn TEST' 

:3Ri^NCH IF LOOP ON TEST DESIRE 
:aET • OF 256. UCRD 3LCCK5 TC 
:GET STfiiRTING BANK t 
;G0 SET UP MEM MGMT IF RE^'-IRD 



CASE BIT COMP 
RO 

ICOUNT 
.+4 

RO 

•64.. P4 
•4.RS 

PAftPA' 
60S 

PC..X0R3g 

:rS)*.r3 

R0.R3 
.+10 

-(SPi 
FC.ERCCP 



^EMENT PhTTERN 

: CHECK IF COMPLEMENT OATEPN 



: COMPLEMENT CHECK 



WORD 



:5ET 256. WORD COUNTER 
:5ET 4 WORD COUNTER 
: BRANCH IF PARITY flEnCR^ 
;NOT TO BE CHECKED 



■M C. 



;;ET Dh'A 
; CHECK DATh 



2:h' 

32&I 

WW* m 

3C73 

3:75 
3376 
2377 
3C79 
3:79 
3C9C 



3052 
3C83 
3094 

3£8S 
3Ij9& 
3037 
3086 
3299 
33 ?C 

3:92 



:::hh2 
:::444 

OiCHsS 

0:0"52 
C104SH 
0104S6 
C1CH62 
CI04M 
OlOM^ 
010472 
012474 
010476 
ClOSOO 

CI . 
013510 

010S12 

010516 

010522 

01C526 

010534 

310536 

010542 

210544 

210550 

212552 
n t ncct 

mm * 

w « w w Ww 



205 IOC 
005142 
212203 
0^0003 
001423 
C050% 
0D4767 
005100 
005162 
0C53C5 
001350 




016602 
004767 
016603 
032737 
001307 
006367 
10222C 
012705 
OllcOO 
016204 
112422 
112422 



1 TC » 2 



1 • • • ' D 



172246 

200004 
176516 

0D00C2 
ruinnnn 

17C2Q2 

C00042 
rnnn \ f 



f 



HDb 

i:-3E«^-"t> 11:59 Phic 72 



R3 

-.«?£' 

R0,R3 

-iSP) 
PC. ERROR 
RO 

-2:R2) 

R5 

6S 

RO 

R4 

5S 

RO 

COUNT 
4S 

4(SP),R2 

2(§P).R3 
•40000, 3ISUR 
40J 
I COUNT 
IS 

132., R5 

iR2).R0 
10(R$),R4 
R4.CR2H 
R4.iR2> 



;CCMPLEf1ENT Crtt^ ViZPZ 
::0f1P'EMENT TEST ChTh 
:iiET CATA 
: CHECK 

:PUSK FAKE STATUS ZU 

; COMPLEMENT CHECI' UCRO 

: RESTORE QATA 

; DECREMENT 4 WORD CC J'HTEP 



OMPLEMENT CHECK UCRD 



www 1 



:C. 

-.DECREMENT 256. UORC 

;C0MPLE1ENT Cw£C^' ^ZPZ 
;OECP£MENT SLOCa COjrrER 



;GET BANK M 



.'GET BLOCK COUNT 

:LCOP ON TEST 

; BRANCH IF lOOP Ti 



; COMPLEMENT PATTERN 
GET FIRST DATS 'i.iRC 
GET FIFTH DPTh AOfiL 
SWAP WORDS :-4 
JI'H 5-9 



3 \CR 5 R:l'IN: 



3:r 

3299 



3121 
31 C2 
3133 
3124 

■j.nc 

3126 
21C7 
3129 
3129 
311C 
3111 
3112 
3113 
2114 
311= 
311fc 
3117 
3118 
3119 
3152 

31£2 
3123 
312"+ 
3125 
312& 
3127 
3123 
3129 
313D 
3131 
213= 
3133 
3134 
3135 
3136 
3157 
313B 
3139 
3140 
3141 
3142 
3143 
3>4 

2:-»5 

214£> 
2147 
-' ^0 



01256)2 
012564 
010566 



012574 
010576 
01C600 
010602 
01060M 
010606 
010610 
010612 
010614 
210616 
010520 
010622 
010624 

010626 
010632 
C1C634 
010640 
21C642 
010644 



012646 
010652 
010656 
010662 
010664 
010670 
010672 
010676 
CI 0700 
210702 
010704 
010706 
010710 
010712 
0107H 
010716 
010720 
012722 



1 3? 



I Ob 



11 



;59 



113422 
110422 
110422 

iiSili 

110422 
110022 
110022 
110022 
110022 
110022 
110022 
110022 
110022 
005305 
001353 
005303 
001347 

005767 172112 
001402 

000167 177344 
012616 
012616 
000227 



016604 
016602 
004767 
005000 
01E705 
005100 
012703 
005100 
010022 
005303 
001375 
005305 
001370 
005304 
001363 
012616 
012616 
000207 



115: 



M'JV9 

nova 

MOVB 
M0V9 
fICVB 

MOVB 

rova 
novB 
novB 

MOVB 
MCVB 
MOVB 
DEC 
3NE 
DEC 
3NE 

TST 
BEQ 
JflP 
MOV 
MOV 
RTS 



:r:u"ine to 

.SB7 

iCflLL: MOV 
MOV 

: JSR 



R4.1R21* 
R4, iR2)+ 
R4. iR23* 
R4. R21+ 
R4, iR2-'^ 
R4. (R2)* 
R0.iR2)+ 
R0.1R2U 
RC.(R2)+ 
RO.iRS^ 
R0,iR2)+ 
RQ, (R2)+ 
RO. (R2)* 
R0.(R2J"t- 
R5 
ICJ 
R3 
7J 

! COUNT 

lis 

IS 
PC 

WRITE 8 XOR 13 WORST CfiSE NOISE TEST oflTTEC^ 
TL 8 XOR 13 ROUTINES 
BANK II,-(SP1 



D0QC04 
176355 

000040 

000=22 



.9X13: 



IS: 
2S: 



3i: 
4S: 



MOV 
MOV 
JSR 
CLR 
MOV 
COM 
MOV 
COM 
MCV 
DEC 
3NE 
DEC 
Br€ 
DEC 
BNE 
MOV 
MOV 
RTS 



•4KSAN<!:s.-(SP; 

PC. 8X13 

2(SP).R4 
4{SP).R2 
PC,ST*IM2 
RO 

t32.,R5 

RO 

«128..R3 
RO 

R0.(R2H 

R3 

4$ 

R5 

3S 

R4 

2S 

(SP)+,(SP) 
(SP)+.(SP) 
PC 



SfiNK COUNT 
:aET FIRST BANK t 
;G0 SET MEM MGMT 

:EfiCH LOOP WRITES 4k WORDS 

:EfiCH SMALL LOOP WRITES 12S ^^CP 

: WRITE INTO MEMORY ADDRESSES 
! DECREMENT WORD COUNT 

;DECREMENT 128. WORD CCJN" 

DECREMENT 4K BANK COUN' 
LOOP UNTIL DONE 
ADJUST STACK 



ROUTINE "TO 

MOV 
MOV 
JSR 



CHECK 9 XOR 13 WORST CASE NOISE TEST PATTERN 



BANKt.-(SP) 
•BANKS. -CSP) 
PC... 9X13 



PUSH FIRST BANK I ON THE S^ACk 
PUSH i OF 4K BANKS TO CHECK ON 
Ch^L ROUTINE 



:-i£tN ,'^Er:Ri exerciser 

3 aCR i3 ROUTINES 



3152 

3:§4 

3l5fc 
3157 
3159 
3159 
3:b3 
3161 

31E>3 
31&4 
31&5 
31&E> 
3:a7 
31&8 
3169 
3172 
3171 
3175 
3173 
3174 
3175 

3176 
3177 
3178 
3179 
3190 
3181 
3182 
3183 
3184 
3185 
31B6 
3197 
3186 
3189 
3190 
3191 
3192 
3193 
3194 
5195 
31% 
3197 
3198 
3199 

32C1 
3202 
j2C3 
3204 



210726 

m 

012742 
0iC"46 



000240 
004767 

004767 
016667 



000716 
177777 
0C0004 
175272 
OOOOOS 



.9X13: 



170CC2 



010754 012704 0C0C40 

01076C CQ5100 

jju7be-ei£7gs- sootss- 

010756 

010766 0:2203 

010770 020003 

010772 001403 

01277'* 005045 

010776 004767 



011202 
011004 
011006 
21:010 
011012 



011015 
211020 
011022 
211024 
011026 
011030 
011C34 

011036 
011042 
011046 
011052 
011056 
01 1060 
011062 
011066 
011070 
011072 
011074 
011076 
011100 
011102 
011104 
011110 
011112 
011114 



012203 
020003 
001403 
205045 
004757 



"isrc CI • 1 It 
:22t 



016602 
004767 
016604 
006367 
001401 
102325 
312705 
005122 
005122 
005305 
001374 
005304 
C01370 
005100 
005767 
001312 
012515 
012515 
0DQ2Q7 



12i: 



li: 
2S: 



3i: 



205305 
001352 
005304 
001355 
005100 

005357 157722 
001347 



000004 
176172 
000002 
157555 



0C4ijM>.< 



405: 
4J: 



L5755-r 



nop 

JSR 
MOV 

nov 

J5R 
MOV 

MOV 
COM 

mjM J 

I 1\J9 



MOV 
CMP 
BEQ 
CLR 
JSR 



MOV 
CMP 
BEQ 
CLR 
JSR 



DEC 
3f€ 
DEC 
BNE 
COM 
DEC 
BNE 

MOV 
JSR 
MOV 
flSL 
BEO 
BVC 
MOV 
COM 
COM 
DEC 
BNE 
DEC 
BNE 
CON 
TST 
BNE 
MOV 
MOV 
RTS 



JOB 

IC-SE^-rb 11:59 Phit "5 



PC.CKSWR 

4;5^).R2 
PC.STMM2 
2(§P\C0UNT 

132.. R4 
RO 

»6'i.,R5- 



:C0 CHECK SWITCH REGISTER 
:5r TEST DftTfl UCRD 
IGET BANK • 

;G0 SET MEM MGMT IF REGlIRE" 
;GET I OF 4K BANKS TC CHECK 

:SET 4K WORD COUNTER 
: COMPLEMENT TEST UORD 
5ET-ia9 -m^ SGUNTEft 



(R2)+,R3 
R0,R3 

.+ic 

-iSP) 
"=0. ERROR 



;R2)+.R3 
R0,R3 

-(5P) 
FCERROa 



R5 
3i 
R4 
2S 
RO 

COUNT 
IS 

4(SP).R2 
PC.STMM2 
2(SP).R4 
ICOUNT 
.♦4 
IPS 

«2048..R5 
iR2) + 
.'R2)+ 
R5 
41 
R4 
4QS 
RO 

ICOUNT 
lOS 

(SP)+.(5P) 
(5P)+,.5P) 

PC : RETURN 

ROTATING :*5 S 2"5 RCUTINES 



;GET TEST DATA 

; COMPARE UITH CHECK UORD 

;PJSH FAKE STATUS ON THE STACK 
ERROR! MEM DATA (R3> NOT = TE 
i(RO), ADDRESS=(R2)-2 

:GET TEST DATA 

; COMPARE UITH CHECK UORD 

:PUSH FAKE STATUS ON "^HE S'hCk 
; ERROR! MEM DATA CR3; NOT = IE 
:(P0), ADDRESS: (R2} -2 

: DECREMENT 129 UCRD CGwN'ER 

: DECREMENT 4C95. UCRD COJNTEP 

:.QLL 4K BANKS CHECKED" 

:GET FIRST BANK ADDRESS 
GO SET UP MEM MGMT IF REG'-IPE 
:G£T I OF 4K BANKS 
: SHIFT ITERATION PATTERN 



:SET 4095. WORD COL'NTER 
: COMPLEMENT TEST PATTERN 



-COMPLEMENT TEST UCFD 



32C3 
3209 
321D 
3211 
3212 
3213 
3214 
3215 

32:& 

3217 

3218 
•50 » a 

3220 
3221 
3222 
3=23 
3224 
3225 
322& 
3227 
3228 
3229 
3230 
3231 
3232 
3233 
3234 
3235 
323b 
323; 
3238 
323<3 
3240 
3241 
3242 
3245 
3244 
2245 
2245 
3247 
324S 
324S 
3250 
3251 
3252 
3253 
3254 
3255 
2255 
2257 

2258 
3559 



J J - 



011120 
011124 
011130 
011134 
01 1140 

011144 
011150 
011152 
011155 
011152 
C111&4 
Olllbb 
011170 
011172 
011175 
01120C 
011202 
011204 
01120b 
311210 
011212 



011214 
011220 
011224 
011230 
011234 

01123b 
011242 
011244 
011250 
011254 
01125b 
011250 
011252 

011254 

0112bb 

011270 

011272 

011274 

011275 
- 1 ' ton 



004757 
Qlb504 
0lbb02 
004767 
012700 

312705 
000241 
034757 
01b203 
103402 
020003 
001403 
005045 
004757 
005305 
001353 
005304 
001357 
01251b 
012515 
000207 



004757 
315504 
015502 
004757 
005000 

012705 
000251 
004757 
015203 
103002 
020003 
001401 
104400 

005305 
001355 
005304 
001351 
01251b 
012515 



000524 
000002 
0000C4 
17blOQ 
177777 

000400 

000124 
177775 



157775 



000430 
000002 
000004 
175004 



000400 

000032 
177775 



KOb 

, i:-=EP-r5 11:59 pfiGE '5 



;heck rotating 'O' bit thrcuch fild of rs 

BflNK».-(SP. :SET STARTING BANK t 
BLKCNt.-(SP* :SET 255. WORD BLOCK COUNT 
PC.ROtO ;CftLL ROUITNE 



PC.CKSUR 
2(4P),R4 
4iSP).R2 
PC,STMf12 

»2S5.,R5 

PC, ROTATE 
-2lR2).R3 
3S 

R0.R3 
4J 

-iSP) 

PC. ERROR 

R5 

2S 

R4 

IS 

:SP)+. (SP) 

(SPM.(SP) 
PC 

;heck rotating t 

BANKi.-(SP) 

BLKCNt.-fsFl 

PC.ROtl 

PC.CKSUR 
2CSP).R4 
4(SP),R2 
PC,STftM2 
RO 

i255..R5 

PC.RO'ATE 
-2lR2).R3 
3S 

RD,R3 
.+4 



P5 
2S 

R4 
IS 

iSP)+.(5Pl 
iSP) + oSP) 
PC 



;G0 CHECK SWITCHES 
GET 255. WORD BLOCK COJfr 
;GET FIRST BANK i 
;G0 SET UP MEM MGMT (I- A.'A: 
•SET CHECK WORD 

SET 255. WORD COUN^^ 
CLEAR CARRY BIT IN "SW 



GET RESULT 
BRANCH IF 'C 
CHECK RESULT 



BIT WAS S£l 



ERROR! COULD NOT ROTATE 'Z' 

THROUGH ADDRESS IN R2 

DECREMENT 255. WORD COUNT 

LOOP UNTIL DONE 

DECREMENT 255. WORD BLOCK C 

uOOP UNTIL DONE 

POP CONSTANTS OFF THE STACK 

RETURN TO CALLER 



BIT "'HROUGH A FIELD OF 3*5 
;SET STARTING BANK i 
SET i OF 255. WORD BLOCKS " 
:CflLL ROUTINE 

;G0 CHECK SWITCHES 

GET « OF 255. WORD BLCChS ' 

GET STARTING BANK i 
;G0 SET UP MEM MGMT (IF A\AI 
;SET CHECK WORD 

:SET 255. WORD COUNTER 
:5ET 'C* BIT IN P5U 
:G0 ROTATE T BIT 
;GET RESULT 

: BRANCH IF 'C IS CLEAR 
: CHECK RESULT 

: ERROR! COULD NOT ROTATE T 
: THROUGH ADDRESS IN R2 
: DECREMENT 255. WORD COUNT 

: DECREMENT 255. WORD BLOCK C 

: ADJUST RETURN ADDRESS 

: RETURN TO CALLER 



LOb 



3354 

111^ 

32E)S 
32b9 
3272 
5=71 
32^2 
3c73 
3274 
3275 
3276 
3277 
3278 
3279 
3290 
3291 
3292 
3283 
3294 
3295 
3286 
3287 
3289 
328? 
3290 
3291 
3292 
3293 
3294 
3295 
329b 
3297 
3298 
3299 
3300 
3301 
3302 
3303 
3304 
3305 
330fe 
3307 
3308 
3309 
3310 
3311 

2313 
2214 
3315 
331fe 

2318 



011310 
011312 
011314 
011316 
011320 
011322 
011324 
011326 
311330 
011332 
C1133S 
011336 
011340 
011342 
011344 
011346 



011350 
011354 
011360 
011364 
011370 
011374 
011376 
011400 
011402 
011404 
011406 
011410 
011412 
011414 
011416 
011423 



011422 
011426 
011432 
011436 
01 1442 



:£^r *^£":=^ £\£i:;:sER riPCYll 



£7.732; 10-5EP-7t 11:59 ofiiE 



106112 

mil 

106112 
106112 
106112 
106112 
106112 
1C6122 
106112 
106112 
106112 
106112 
106112 
106112 
106112 
106112 
106122 
000207 



016604 
016602 
004767 
016700 
012703 
010022 
010022 
010022 
010022 
005303 
001372 
005304 
001366 
012616 
012616 
300207 



004767 
016700 
016604 
016602 
004767 



;ROUT:nE fO 
AOTATE: ROLB 

m 

ROLB 
ROLB 
ROLB 
ROLB 
ROLB 
ROLB 
ROLB 
ROLB 
ROLB 
ROLB 
ROLB 
ROLB 
ROLB 
ROLB 
ROLB 
RTS 



ROTATE 'C BIT ^HROUGH A MEMORY _CChTION. 

(R21 :(R2)=177776 CR OOCCOl 

iR2) ; I R2)= 177775 OR 000022 

(R2) : ,R2)= 177773 OR OODCOM 

.R2) ::R2)=177767 OR OCCCIO 

CR2) :'R2)= 177757 OR 000020 

(R2^ : (R2) =177737 OR 000040 

(R2) :(R2)=177fe77 OR 000100 

(R2) :(P2)= 177777 OR OOOOOC 

(R2)+ : I R2) =177577 OR 000200 

iR2) : (R2)= 177377 OR 000^00 

Xm) :(R2) =176777 OR OOiODO 

(R2) : I R2)= 175777 OR 002000 

(R2) ;:R2) =173777 OR 004000 

(R2) ;^R2)=167777 OR OICOOC 

(R2) :(R2)= 157777 OP 020000 

(R2) :(R2) =137777 OR 040000 

iR2; ; (R2) =077777 OR 100000 

.R2)+ (R2)= 177777 OR 000300 

PC ; RETURN 



: ROUTINE TO WRITE USER 5LECTED PATTERN INTO MEMORY 



000002 
000004 
175654 
174C12 
OQCICO 



.USER: 



IS: 
23: 



MOV BflNK«.-(SP) 

MOV BLKCNT.-(SP) 

JSR PC,.. USER 

MOV 2(SP).R4 

MOV 4(SP),R2 

JSR PC.STMM2 

MOV .CONST.ro 

MOV 164.. R3 

MOV R0.(ft2)+ 

MOV R0.(R2)+ 

MOV R0,(R2)+ 

MOV R0,(R2)+ 

DEC R3 

BNE 2S 

DEC R4 

BNE IS 

MOV (SP) + .(St') 

MOV (SPH.CSP) 

RTS PC 



PUSH STARTING BANK « ONTO 
AND 128. WORD BLOCK COUN^ 
CfiLu ROUTINE 

GET BLOCK COUNT 
GET STARTING BANK i 
GO SET UP MEM MGMT 
GET USER CONSTANT 
SET 256. WORD COUNTER 
URITE 256. UOROS 



: DECREMENT 256. WORD COUNTER 
LOOP UNTIL 256. WORDS HAVE BEEN l,R 
DECREMENT BLOCK COUNT 



•.ADJUST STACK 



•SBTTL USER PATTERN ROUTINE 
ROUTINE TO CHECK USER SELECTED PATTERN 
CALL: MOV BANKI.-(SP) 



000222 
173750 
00C002 
000004 
175572 



MOV 
JSR 

..USEP: JSR 

MOV 

1$: MOV 
MOV 
JSR 



22:9 211446 012705 COOlOO 



2S: 



10V 



BLKCNt.-(SP) 
PC,.. USER 

PC.CKSUR 

.CC)NST.R0 

2(£P).R4 

H'SP).R2 

PC.STMM2 

«64,.R5 



:PUSH STARTING BANK « CM: S'ACk 
:ANO 256. WORD BLOCK CCUNT 
;CALL ROUTINE 

:G0 CHECK SWITCH REGISTER 

:GET USER CONSTANT 

;GET » OF 256. WORD BLOCKS 

:GET STARTING BANK » 

:G0 SET UP MEM MGMT IF REGUIRED 

:SET UCRD COUNT 



33cJ 
3321 
33=2 
3323 
3324 
3325 
3326 
332" 
3323 
3229 
3330 
2331 
3332 
3333 
3334 
3335 
3336 
3337 
3338 
3339 
3340 
3341 
3342 
3343 
3344 
33i5 
234b 
3347 
3348 
3349 
3350 
3351 
3352 
3353 
3354 
3355 
335& 
3357 
3359 
335^ 
33b0 
33E>1 
33&2 
33£i3 
33Ei4 
33&5 
33E>& 
33b7 
33E>8 
33b9 
3370 
3371 
3372 
3373 
2374 
3275 



01I4E2 
011452 
011454 
011456 
011^^60 
CI 1462 



011466 

31147C 
011472 
011474 
01147b 



011502 
01150'' 
011506 
011510 
011512 



011516 
311520 
011522 
Q11524 
01 1526 



011532 
011534 
011536 
011540 

011542 
011550 
011552 
011556 
011560 
011562 
011564 



011566 
011566 
011572 
011576 
OUbOS 
OllbOb 
011bl2 
OUblb 
Qllb24 



:£4n ^Er:«5^ £x£«;:isep 



012203 
020003 
0Sl403 
00504b 

C0476' 167536 



0122C? 
0200C3 
001403 
305046 

004767 1674^2 



012203 
020003 
001403 
005046 

004767 lB745b 



012203 
020003 
001403 
CC504b 

0047b7 167442 



005305 
00 134b 
005304 
001342 

032737 OwQuQj 177570 
001330 

006367 167166 

001325 

012616 

012616 

000207 



MDb 



MflCYlI 27.r3£i 10-5EO-76 11:59 PfiiE 79 



3i: 



MOV 
CMP 
BEQ 
CLR 
J3R 



CMP 
BEQ 

CLR 
J5R 



MOV 
CMP 
BEQ 
CLR 
JSR 



MOV 
CMP 
BEQ 
CLR 
JSR 



DEC 
BNE 
DEC 
BNE 

BIT 
BNE 
ASl 
BNE 
MOV 
MOV 
RTS 



(R2H,R3 
R0,R3 

.+lo 

-(SP) 
PC. ERROR 



CP2;-»-,R3 
R0,R3 

-(SP) 
PC, ERROR 



^R2)•^.R3 
R0,R3 

-(SP) 
PC. ERROR 



.+'0 
-(SP) 
PC. ERROR 



R5 
3S 
R4 
2S 

«40QD0.3»SLJR 
IS 

I COUNT 
IS 

(SP)+.(SP) 
(SP)+,(SP) 



GET TEST DflTfl 

COMPARE UITH CHECK UORD 

PUSH FftKE STATUS ON THE STACK 
ERROR! HEM DATA (R3) NOT - 'ES^ Ih*^ 
(RQ), ADDRESS: (R2) -2 

GET TEST DATA 

COMPARE WITH CHECK WORD 

PUSH FAKE STATUS ON THE STACK 
ERROR! MEM DATA (R3) NOT = TES'' DA'fi 
(RO), ADDRESS=(R2)-2 

GET TEST DATA 

COMPARE WITH CHECK UORD 

PUSH FAKE STATUS ON THE STACK 
ERROR! MEM DATA (R3) NO^ = TEST Dfi'A 
(RO), ADDRESS=(R2)-2 

GET TEST DATA 

COMPARE UITH CHECK WORD 

PUSH FAKE STATUS ON THE STACK 
ERROR! MEM DATA ^R3) NOT = TES"^ DATS 
(RO). ADDRESS=(R2)-2 

DECREMENT UORD COUNT 

DECREMEN'^ BLOCK COUNT 



: CHECK LOOP SWITCH 

;LOOP CHECKING THIS PATTERN 

: SHIFT PATTERN INDICATOR 

: ADJUST STACK 

;RETLRN TO CALLER 



004767 166512 

004767 002172 

010267 000042 

010367 000040 

Q047b7 IbbSlb 

Ollbb7 000024 

01b777 0CQC24 GOOD 16 

Clb7b7 000014 OQOOOb 



.SBTTL 
; ROUTINE TO GET 
: ROUTINE LEAVES 
:ANC THEAAST 2 

liECD: 



GET TTY INPUT ROUTINE 

ASCII INPUT FROM TTY. AND CONVERT TO OCTAL. 
THE FIRST 16 BITS IN ADDRESS FOLLCUINTG THE CAL^ 
BITS IN . 1617 BELOW. 
JSR PC.RECD 



JSR PC.SSAVR 

JSR PC.INUM 

MOV R2.TEMP2 

MOV R3.TEMP3 

JSR PC.SRESTR 

MOV I SP). TEMPI 

MOV TEMP3.3TEMP1 

MOV TEMP2,.16r 



:&0 SAVE REGISTERS ON THE STACK 



•.RESTORE REGISTERS FROM STACK 



NOb 



•:24k •'EUvRy exerciser 
get ^tv inpl't pojtine 



337b 
3377 



338C 
3381 
3382 

m 

3395 

m 

3388 
338S 
3390 
3391 
3392 
3393 
3394 
3395 
339& 
3397 
3398 
3399 
3400 
3401 
3402 
3403 
3404 
3405 
3406 
3407 
3408 
3409 
3410 
3411 
3412 
3413 
3414 
3415 
3416 
3417 
3418 
3419 
3"20 
3421 
3422 
3423 
3424 
3425 
3426 
3427 
3428 
3429 

3i3: 



011632 062716 

011636 000207 

tm m 

011644 OOOOOC 

CI 1646 COOOCC 



pnn'-.-- 



011650 
011656 
011664 
011666 
011672 
011700 
011702 
011710 
011712 
011720 
011726 
01 1734 
011742 
011744 
011750 



011752 
011760 
011766 
011774 
012002 
012010 
012016 
012024 
012032 
012040 
012046 
012053 
012060 
012066 
012074 
012102 
012110 
012116 
012124 
012132 
012137 
012144 
012152 
012155 
012161 
012166 
012174 
012201 
0122C6 



042767 017777 

332737 000400 
':01402 

004767 000464 

032737 001000 
001404 

056767 167040 
000403 

056767 167024 

016737 167024 

012767 040177 

032737 004000 
001402 

105067 166774 
000207 



005015 
051505 
046040 
051522 
052122 
033061 
005015 
042514 
052111 
030057 
047057 

015 
052122 
040502 
034050 
005015 
032040 
045516 
052C40 
024470 

015 
042524 
020077 

015 

015 
020105 
040524 

015 
052125 



047524 
047524 
040517 
051440 
040440 
006462 
047105 
050040 
037531 
054475 
020117 
051412 
047111 
045516 
037451 
020043 
020113 
020123 
051505 
020077 
050012 
047122 
000 
037412 
052012 
047503 
052116 
044412 
021440 



16^072 
177570 



177570 

167040 

167030 
177570 
167010 
177570 



051040 
042522 
042504 
040524 
020124 
000012 
041101 
051101 
030440 
051505 

000 
040524 
020107 
021440 
000040 
043117 
040502 
047524 
024124 

000 
052101 
021440 

000 
050131 
051516 

000 
050116 
047440 



"ACxl 1 


n** . 


::-5EP- 




ADD 


•2.15F, 




RTS 


PC 


.1617: 


.UORD 


0 


TEMPI: 


.UORD 


0 


TEMP2: 


.UORD 


0 


TEMP3: 


.UORD 


0 



:ROUTINE TO CHECK THE SWITCH REGISTER ^ 
i CHECK SWITCH 9: IF SET. LOAD ERROR COUNT INTO THE DISPlA. cE^I-'-c 
:IF NOT SET. LOAD PASS COUNT INTO THE DISPLAY REGISTER 



(kSUR: 



lOS: 



li: 
2S: 



BIC 
BIT 
BEQ 
JSR 
BIT 
BEQ 
BIS 
BR 
BIS 
MOV 
NOV 
BIT 
BEQ 
CLRB 
RTS 



SAVE RELOCATION BITS 
CHECK SWITCH 8 
BRANCH IF SET 

GO RELOCATE PROGRAM BACK TC ftUZ 
i SWITCH 9 SET ' 

;LOAD ERROR COUNT 



•17777.LDDISP 
tBITB.iltSWR 
lOS 

PC.REL24K 
«BtT9.3«SWR 
IS 

ERCNT.LDDISP 

ICNT.LDDISP ;LOAD PASS COUNT 
LDDlSP^aiDISPLAYjLOAD THE DISPLAY REGISTER 
•040177, ICOUNT :LOAD ITERATION COUNT UORD 
«4000.ai5WP ; CHECK SWll 

ICOUNT : ICOUNT =040000 IF SWll =1 

PC 



AElLDR?^fASCI2 <15"12>*T0 RESTORE LOADERS START AT 162' '15^ 12- 



PARITY: .ASCIZ <i5><12> 'ENABLE PARITY' 1'0="'E5''N0 ' 



STBANK: .ASCIZ < 15>< 12 > 'STARTING BANK 1(81" ' 



BANKS: 



.ASCIZ '.:5^a2^'l OF 4K BANKS TO TESTiS)' * 



PAT: .ASCIZ <15><12>' PATTERN t' 



QUEST: .ASCIZ a5><12>''' 

CONST: .ASCIZ <15><12> 'TYPE CONSTANT' 



PRG3M: .ASCIZ <15><12>* INPUT « OF 256. WORD BLOCKS TO TEST INSTEAD OF' 



» mm 



.5.-. 




.'.53. ■» 

::233fe 

r m 



^ .i^H: 

2 




fc::l4 :5l!:: 



3-5 ::H-! !f|:!; >i5£: ^2:1:3 



wA^V'wC w • w M W 

xfxfS;; x*2El- "''Stcs 
..c3rC ..'nt* i>jes£ 



3-!a ;:=3TH cex^c 



**?t^-r i^'S^^ 

r73i4?5I ?^57T7 'nn'*?* 

::=-n2 213737 ccc^s: 



-■3»2t "s-^c-a- C""""-! 

vsCCZ 



as:;: 



.E.£N 



s:: 

Jsfi 

s:: 

~ B 



Stl7b 
3ti{>2 



FOIW SASC ACDPEiS 



= a: 




K PTR 



»«ir, 



.5317^ BRANCH i:SB;.E r:3 rE-:s 
t«»»*PROGRAK OESCRIPT!:N«t»»» 

A PSEUOO-flOOIFIEC VERSION OF 7? 




fi;?f7 

PUT A HALT AT 176 
RESTCPE LOADERS S 



SRAN> i:SS-£ 
CAUSE THE 
ON 



HERE IN its ORIGINAL FORfl. BUT .TEJIORY P!ANA^n£NT 
CABABILITIES HAVE BEEN A06EO TO GIVE IT OPERATING 
ABLITIES IN A Q-128K ?1E«0RY ENVlRONflENT. 



•♦♦♦tOPERATiNG PROCEDJRE»t»#t 

UriU l:AD£D THIS PROGRAM 5 STARTING ADDRESS I 
PJNNING THE FOLLOWING STEPS ARE TAKEN: 
, A PROGRAM ID IS TYPED ON THE TTY: 
BRANCH GCBBuE rOS TEST 
:.5 THE PROGRAr* CE7ER?::n£S :F THERE 



IS 



• m M * 



C07 



AND ThE J5E9 !5 TCwC. 
'MC USER IS ASKED: 

USE MEHORY IANhGEMENTW 'P 'i 

IF THE wSER TYPES Y. THE riEfORY MHMfliEnET 
UILL B£ L5ED TO RLN THE ^EST. IF HE TiP£= 
N THEN MEMORY MANAGEMENT UiLL NOT 3E USED 
IN EITHER CASE THE ACTUAL TEST Ul.. BE 
PERFORMED BY THE UNMODIFIED ORIGINAL '.ERSICN 
OF BRANCH GOBBLE. 
NOTE THAT WHEN THE TEST OF r^EMORY 
-OCATED IN UNIBUS ADDRESSES HIGHER THAN 
rr777 IS DESIRED. THE ENABLING OF MEMOR*- 
MANAGEMENT IN THiS PROGRAM IS MANDATORr. 
NOTE ALSO THAT WHEN THE TEST IS TO BE 
IN THE 0 TO 177777 RANGE OF L'NIBUS ADDPESSEB 
IT IS RECOMMENDED THAT MEMORY MANAGEMEN' 
3E DISABLED. 

'HE PROGRAM WILL THEN ASK THE -SEP 
FOR THE HIGH ADDRESS lIMIT FOR 'HE '£3': 
WHAT IS THE HIGH LIMIT: 

AND :^EN FOR THE LOW ^IMIT: 

WHAT IS THE ^OU LIMIT: 

SC'H CF THE ADDRESSES SHOULD BE SPECIFIED IN 
OCTAL J5ING THE FORM XXXX03, THAT IS T^-E 
ADDRESSES MUST BE THE BEGINNING OF ICD 3i'E 
SHOCKS OF MEMORY. IF THEY ARE NOT THEN T„r-, 
wI.L BE TRUNCATED! 

'HE ADDRESSES WILL BE INTERPRETED AS FULL 13 
• n,TCMs ADDRESSED 

vaIid'ADDRESSES'mEET the FOLLOWING CCNDI'ICN 

1. THE SPECIFIED SPAN CF THE 'EST 
SHOULD NOT ENCOMPASS 'HE ACTUAL 
MEMORY LOCATIONS OCCLPIED BY THIS 
PROGRAM. THIS PROGRAM IS RElCCA'AS.E 
AT LOADING TIME. SO THAT NO LlMr^':' 
ARE THUS IMPOSED. 

2. THE HIGH LIMIT SHCulC BE GREGTEP 
THAN THE LOU LIMIT. 

3. THE NUMBER MUST BE SPECIFIED 3". 
CC'AL DIGITS. 

4. IF THE USER HAS DISABLED MEMORY 
MANAGEMENT THE ADDRESSES SHOLlC 3£ 
IN LOW MEMORY. I.E. uESS THAN 177"7-. 

IF AN^ CF THESE CONDITIONS IS NOT ME' 
THE USER UiLL BE ASkED TO INPU^ AN0'H£9 
ADDRESS. 

NOTE THAT IF ANY OF THE ADDRESSES IN THE TES 
SPAN IS A NON-EX I 5TANT MEMORY LOCATION 
A TIME OUT ERROR ^ILL OCCUR FROM UHlCh 
NO RECOVERY CAN BE MADE EXCEPT '0 RES'AR' 
AT THE STARTING ADDRESS. 

^HEN THE ABC».E informat::n has been 
sj:;e=sfulu. ga-here: «^5cm -=£«. '-£ 



D07 



3t-'5 

WW ' w 

3iSl 
■jcsr 

■sec- 
3559 
3559 

35&: 

-sec ■ 

www * 

35si 
35fe3 
35s-* 
35si 

3=67 

3wdS 

33b <3 

■3C7-' 

WW • w 

35r: 

3§73 
25:'>f 
3575 
3576 
3577 
3575 
3579 
35B2 
3531 



3583 
358H 
3585 
3586 
3587 
3588 
358S 
259C 
3591 
3592 
3593 
359H 
3595 
359fe 
3597 

WW tfW 



"^1 5a "31 



CIBW 
212-450 
012454 
Q12458 
012462 
Cl24ab 
31c46fc 
012472 

012474 
012500 
012502 
312S06 
012512 
012Slb 
012520 





H ' PC -ST 

&WWW 

012536 

:ir54: 



rv£s;:crp "AMI =7 



• W WW w 



il:59 PAit E2 



205067 
X5067 
X'*567 
015206 
X4767 
004767 

004567 
015141 

105737 
100375 
113746 
042716 
004767 
005726 
022766 
021513 

022766 
DC14C6 
2l£74s 



16545« 
166302 
166304 

167362 
001566 

166266 



177560 

177562 
177602 
001522 



000131 177776 



•.WW * * Q 



H «£f1CR> FrtULT OURIMG THE 'EST *hE 
PROCESSOR WILL 9E WAlTED THE "i CCA'I-T 
OF THE flEflORY FAULT. 

5. IF THE TEST IS COMPLETE UITHOUT AN 

ENCOUNTER WITH fl MEflORY FAULT ANY UHEPE 

IN THE TESTED SPAN, THEN THE TES' 

wI^L BE REPEATED BY RETURNING TC S'EP 4. 

a.^ IF THE USER WISHES TO STOP THE TEST IN 9R:GCE3= y 
ANOTHER wrH A DIFFERENT RA'CE THEN HE S^-C-.: -I' 
SWITCH AND START THE 'ES"^ AiAIH A' £52. 



OP* 

CONSTANTS: 
KPDR=a77406 

THIS ROUTINE TAKES CARE OF THE IDENTIFICATION. 
ASK THE USER IF MEMORY MANAGEMENT SHOULD SE 
ENABLED. AND IF NOT DOES THE SET UP FOR THE 
ACTUAL tEST. IF MEMORY M .^iAG£KENT IS 
DESIRED THE ROUTINE YWMBGO IS GIVEN CONTRC. 



ODFL.G 



§SCNCH: 



I5i: 
li: 



21: 



.WORD 



CLR 

C-R 

JSR 

.WORD 

JSR 

JSR 

JSR 
.WORD 

T5TB 

BPL 

.1C'.2 

BIC 

JSR 

TST 

CMP 

BEQ 



CMP 
BEG 

MOV 



RELFL 

HMAVA 

RS.IPRINT 

IDftESS 

PC.SLOR 

pcmSspar 

R5, SPRINT 
MM*ES3 

aiTKS 
2S 

3»TKB.-.£P; 
•177660. I 3P) 
PC. TYP it 
iS^)* 

••Y.-2iSP. 
YMMSGO 

•'N.-2i£P. 
3S 

• SP. 



: INITIALIZE THE RELOCATION irCICA'CS. 
: INITIALIZE THE MEM. MANAiEIEN' -^AS. 
;G0 TO PRINT ROUTINE 



:iO TO PRINT ROUTINE 
:MEMOR't MANAGEMENT SHC. 
:SE ENABLED 
:WAIT FOR A CHARACTER. 



:GET THE CHARACTER. 

:ECHO THE CHARACTER. 
: RESET THE STACK. 
:IF IT IS Y. THEN GO 
:T0 YMMBGC TO ENABLE 
: MEMORY MANAGEMEN' 
:IS IT N^ 



: IF r ^AS 



ME'pEF 



EQ7 

£5' :::ri=-: :-:£4n .tEKCS^ exerciser ma:vii -3= i:-=Ec--t i::?? 



BRANCH 2:flSuE ?i:5 MEfL^v TE5' 



3s:c 

3913 
36lH 

3&:5 

3S:6 
3617 



3&20 
3621 



3S2M 

s&as 

5ec7 
3&2S 

3e3: 
3£>32 
3^33 
3=34 
3e3E 

3£>3& 
-at -37 

3&39 
3&HG 
3641 

3&4H 

3£-»7 

36-.8 
-3:.4Q 



2:£SSH 




e: 



OlSblb 

GlSbSG 
012b3S 
012640 
0 12644 




312654 
012656 
::2662 
2:2666 



Ql< 
060716 

^476^ 
004767 
012746 
004767 
005726 
02276' 
302026 
2:6700 
004767 



212672 016720 001264 



212676 
012722 
212706 
012712 
212716 
012720 
012724 

012730 
212732 
012736 



212742 
212746 
012750 
212752 
212754 



004767 
010067 
005037 
012704 
Q6C70M 
062704 
010437 

300002 
02«767 
0QQ167 



012721 
006300 
305221 
002775 



000042 
002544 
000036 
000020 

177''72 
000024 



C22-*C- 
177672 



177772 



177772 
000774 
000436 
000052 
001372 

001076 
000054 
002556 



3S: 



5PC 



1^: 



PEFETS: 



JSR 



BGE 

nov 

ADD 

nov 

JMP 
CLR 

nov 

ADC 

m 

JSR 

SEPETl: nov 



cnp 

BiE 

ncv 

JSR 



nc*. 

J5R 

n:v 
:lR 
ncv 

ADD 
ADD 

nov 

RTI 
JSR 

jnp 



-.PIT 



•3Pof-..RC 

PC.RO 

t-i.RQ 

W' 

•FIRSTl-..- 

PC.vSPi 

•-6.CSP) 

PC,LCSEG4 

PC.LOsEGl 

•200.HlLin 
REPEtS 

PC. Hi 



LOLir^.RC 

PC, ROT 
RC.LO 

at^6 

•REPET3-..R4 
PC,R4 
•-6.R4 
R4,il34 



PC.LuSEa2 
RE^ETl 



:'H£ .5ER 5iH:^. 

: BLOCK NirBERS IJ' 

:m»€ Hlir. 



:St' "'^€ pARmMEtEPS 
:IN THE AC'JAl TE5' 
•.RCUTINE. 

:D: THE SfinE FOR 'HE 
:.CU ADDRESS LWIT. 



;SET uP THE .'ECT0R5 
:FOR AN INTERUPT 
;FROn A TRAP INSTRL'CTICN 
WHICH WILL BE USED TC 
: RETURN FROM THE TEST 
: ROUTINE UHEN IT 15 :CN£ 
: START THE TEST. 



RO TC THE LEFT SIX ai'S 



TfilS RCUTINE IS CALLED TO Sril^' 
ftCT: MCV 1-6. Rl 
li: ASL RO 

INC Rl 

BLT 1$ 

RTS PC 

IyMMBGO SETS UP FOR USING MEMORY MANAGEMENT TO 
:D0 THE MOS TEST. _ 
:fi^L THE MEMORY MANAGEMENT REGISTERS UHICH ARE , 
:Tj remain STATIC FOR THE TESTS DuRATICN ARE aE. 



M «^ w 

3aS2 

3&e4 

2667 
366S 
3669 
3670 
3671 
3673 
3675 
3674 

35-5 
35^37 

3& • 5 

35-? 

3632 
3681 
3632 
36E3 
363*4 

3636 
2697 
3688 

www ^ 

369C 
2651 
3693 

36H 
36% 
2657 

wW 

27:1 
27:3 

w ' w ' 

W ' WW 

2726 
■37*7 

575e 

Sw7 



"£*-:^ exec:: sec vh:-,;! 
ss-^^:.- ::3s^£ r^EMCc;- test 



F07 

1C-5EP-76 li:59 PA:E 2^ 



31=756 
21276M 
C12770 

D13CC0 
013032 
013226 
013010 
213014 
013220 



21C7&" 
023037 

2127r'^ 



312704 
210322 
062703 
012721 
005204 
021371 



w * wwww 

w * 3w3^ 

213242 

wl3u5C} 
C12352 



w • wwww 

213264 
013072 
213276 
213102 

"111 in 



1-11=7-37 

w * w ' w < 



1C 



025246 
012746 
060716 
262715 



216767 
216767 
004757 
Q127W6 
024767 
225726 
212737 



w WWwWw' 



r7572 
r2342 
172322 

177772 

000222 
077426 



i55'65 



013224 00476* 0225J 



224757 0C257C 

WW* Wkrfw * wwww 



rnpsr- 

wwww WW 

177772 



WWW' w I wwww * 

0D0674 232672 
000174 
Q20052 
001132 

wl3l2w wwwww*^ 
www wWw 



THE i:r*If3 ;^RE THEN GOTTEN CHECkEC FOR '.fiul^r . 
ThE mp INTESPUPT VECTORS ARE SET A'C iM^Sil 
IS CALLED. YKMBai IS A ROUTINE THE SETS thCSE 
flEnORY HAf^AGElENT REGISTERS UHICH '^EEC TO 
BE CHANGED DYNAMICALLY OjRING "^he TEST. 



^r.rBa2: ricv 

CmR 

Mv 
MOV 
CLR 
NOV 

nov 

ADO 

MOV 

INC 



4Z. 



:sR 

5£?£'2: CLR 
fCV 



•-l.WlAVfl 

atsfto 

•kIPARO.RO 
iklPCCRi 
R3 

i-10.R4 

R3.(ft0> 

t2£)0.R3 

•k'Pcr..r; " 

R4 
IS 

PC. LiniTS 



PC.L35Ei4 
■7522.atK:sMs: 



:fiEiI5TERS. 



•FIRSTl-, 
•-fe..5P. 



as. 



HE .I.1ITS FCP THE =E:c::.i 

THEY ORE LEFT IN S.O. 
PCRn IN HiLin AND LCLir. 
SEE IF PERMANENT RELCCA'ICN !£ 
APPROPRIATE FOR THIS ''EST =Fi'- 
iH? T^€ UNlBJl DEVICE PAiE I 
HiiH VlRTUi 



INTO 



.-.3P) 



MOV 
JSR 
MOV 

;|R 

T§T 

MOv 
CtR 



hlSAV.HlLi:^ 
LOSAV.' OLIM 
Pc,LOSSil 

■'♦.-vSP) 

PC.tYPIT 

V SP) ♦ 

»^MM9Sl.il3i 
3«36 



SET UP THE S'ACk 

t: siMiiLA-p 'HE c:c-RSE'.:£ 

H.^ iNTpfiJ' SC T-hT -£=• :- 
9E 3TARTE2 .SiNi AN BTI. 



SET UP THE TRAP INTEOS?.^' 
^ICh iilLL 9E JSED TC »E'-R^ 
TESTING RCJTINE. 



rriMBGl IS USED TO DYNAMICALLY ALLOCATE MEMORY UNDER nE*1RV •^H^;;:E-£^ 




213122 


203237 
026767 
1014S1 
012700 
516725 
• 212721 


17757c 


vMr^SGl: CLR 


222626 2026=6 


CMP 


0lji34 




BLOS 


212136 
212142 
212146 


172342 


MOV 


220614 

.lit 


MOV 


MCV 



BEFORE HAVING TO RESET THE MANAGEMENT REGiMrS. 
BPGOE ALWAYS IS IN LOU VIRl _ 
ADDRESSES ARE ALUAYS MAPPED 



BPGOE ALWAYS IS IN LOU VIRTUAL MEMORY ANQ^UPPgR VIR' A._ 
ES ARE ALWAYS MAPPED INTO JNlBUa DEVICS ADDSEsSES. 



aiSRO 

HILIM,»:-IM 
DON IT 
iKlPHRl.RG 
LOlIM.PS 
«-6.Rl 



IS THE ^EST DONE" 

VE5. THEN BRANCH. 

EL5^ GET READY 'C 5E' 

>E KERNAL SPGE hCr^EES -EiirE^S. 



1 p: 



G07 



•37CO 



013152 
C13150 
C:3i62 

1313172 
C1317M 

n t T ' -t, 



-•OS' I 



:i3222 i5)&7&7 DGQ53£ 



3715 

3-:fe 



3"i9 
3-19 
•3-:- 



3-25 



3728 

■J- 30 

3732 
3-31 
3-32 
3733 

3-3? 
37-; 

3-"i: 

J t3 

""44 

3--J5 
3--r£ 

««« . ^ 

J ns 



J' 3^ 

375-f 

::3£72 
CI 3276 
C133D-4 
3-£9 2:333& 
013312 
013320 
3-£2 C12322 

~"j'34n 



310S20 
C62705 



•no- 



101437 



C352C1 
002770 
0105&- 



:022-44 



152705 0CC002 
:l£757 CC05-2 002233 



01322b 
013232 
013236 

013252 
013255 



0:32fcH 



01&7QC 
004757 
0527CQ 
010067 
010557 
005237 



:04-57 



002216 
177504 
C20C0C 
002202 

177572 



w^sCc7 
025727 
103011 
005367 
322767 
1C3QC4 
012767 
000207 
Ci2767 
00Q770 



000462 

000210 
00C20C 



7 nn^sn- 



D00446 



000200 000432 



C00'^2C 



li: 
2i: 
25S: 



4i: 



M*" 
* IV « 

ADC 
INC 

nov 



3L'B 
5R 

*» r ■ 

• V « 



S»3 

no.' 

JSR 

)?D0 
flOV 

in: 



•260,95 

HILIM.P5 

3S 



li 

rs.h: 



•2.R5 
4J 



:n,.-! 



HI.RC 
PC.ROT 
•2t00j.R: 
RC.hl 

£tSRO 



:5^^*.>SP^' 
SEPETc 



RESt' 'HE ^:»ftR•£ 

REACHED HlLlfl^ 
E5, GOTO 3S. 

NO. INCREflENT Ri ArC SEE I" 

kl^AR'S HAVE BEEN SET. 

ALL THE kIPAR'S HAVE NOT SEE'i EE' ■ 

hi^Wil ^I'all^thI^tesT^sPW^ -^^i 

BEEN ALLOCATED TC SOflE ylFT.A^ KZ- 
13 THE KERNAL INSTRUCTICN =PA:£. 



:C THIS IF A-. ThE 'E=^ E=i'i --= 3: 

ALLOCATED TO ^H£ .IR'-A- .E^>;> ==; 

JJ3T ALLOCATEC. 

::f1FjTE THE .IR'LA. -iri* 

:f THE 'E5' 5=mN. 



'-FN ON MEriORt ''A'^AiE^E 
RE'JRN TC 3PG0B ^0 
PERFORM THE TES^ I'l 
THE SPAN INDICATED 
3Y THE RESL'L" 0^ '-E 
ABOVE 



:*E=* ::r!PLE-£:. s: 

:RE£TAfiT 



.CSEil IS CALLED TO DECIDE WHETHER OR NOT THE LIMI'S ARE =- 
THE FIRST HK CF fCMORY UIU. HAvE TO BE CHECKED IN THE "^EST. 
TC DC THE LIMITS iNCkUDE 500REiS|S UH|CH ^lEH ^N TH^ FIRST 



Or MEMORY THUS REOUlRING THAT 
MEMORY BE MOVED INTO THE 
RUN THROUGH THE FIRST 4K 



SETS LC5FL TO 
AOPPOPRIATELY. 
LDSEil: CLR 
CMP 
6HI5 
DEC 
CMP 
BHI5 
:i: MOV 
2i: R'S 
21: MO.' 
BR 



?h£' CONTENTS OF THIS FIRST 3L 
CONO BLOCK 50 THAT T« TEST 
OCK. IF ^LOCATION IS NECESSARY 



-1 AND RESETS THE LIMITS. LCcIM AND HILIM. 



'HA' 
AN_5E, 

bwSEal 



LCSFL 

L0SAV.I200 

2S 

LOSFL 

•200,HISAV 

31 

•200,L0LIM 
PC 

•200.HILIM 
It 



laEriH^'LCU Ll.rr :R 'HE 
:LIE IN THE FIRST 4k 0 



.:sEi2 IS callED t: o: 'he a:'--al re.ccaticn of ThE pifs' ■i^ -£^::R 



H07 



c 3*: 



3-:= 



213350 
013352 
C1335b 
3133&C 
31336M 
013370 
Q13r2 
C13374 
013M02 
C1340b 
C13M10 
013M12 
013414 
013420 
013424 
013432 
C13436 
313442 
013446 
013450 
013454 
013460 
013464 
013470 
013472 
013476 
013502 
3504 



3"'b 

J779 
:7'9 

3730 
37S: 
3-'92 
3733 
3794 
3785 
3736 
3797 
3700 
3739 
3792 

3792 
3793 
3794 
3795 
3796 
3797 
2793 
3799 
3900 

www* 

•sons 

wwww 

3904 
3905 
3326 
3907 
3923 
35C9 
3910 
3S11 
3312 
3313 
3S14 
22:5 

2917 
3S:9 

^w * 

22cl 

w^ww w * W^ W 



012510 
212514 



012520 
012524 
012526 
C12532 
013536 
013542 



013544 
013550 
013554 
013556 
013562 
013564 
013566 
013572 



• .zq 



OC5-57 

100401 
000207 
012667 
005737 
100423 
004567 
300000 
020000 
012737 
012701 
060106 
060116 
060107 
C60137 
060167 
012767 
016700 
004767 
020027 
002002 
012700 
010067 
016700 
022700 
002002 
012700 
020027 
003002 
000167 
004767 
010367 



012701 
060701 
062701 
010137 
005037 
000002 



016746 
005767 
100417 
004567 
020000 
OOOOOC 
005037 
012721 

*Ww • WW 



030242 
000120 

172656 



^^^^^^ 

020000 



000114 
000174 
177777 
000326 
177300 
000320 

000320 
001772 
000302 
000200 

000200 
000004 

000034 
177226 
001730 



000024 

177772 
000034 
00wG3w 



C00350 
000042 

172464 



GOO 120 

WmWW WW 



BAtik :ntu the second 41' ''EiCR. Bhnk, 'hE i R-n the TE=' 

THROUGH THE DESIiNfi'^ED PflO'S OF THE c'lRS"' BANK ftfC 'hEJi FJS' 
THE CONTENTS OF THE ^IRST 2ANf S> rC.'INi TrtE SECOND SHrii- '! 
CONTENTS BfiCK INTO THE FIRST 9hNK. 



^0SE:2: TST 
BMI 



li: 



164466 



14i: 



15S: 



3i: 



RT5 

MOV 

TST 

Bfll 

JSR 

.WORD 

.UORO 

^10V 

MOV 

STD 

fiOD 

AOD 

AOD 

AOD 

nov 

MOV 
JSR 

cnp 

BGE 

MOV 

nov 

MOV 
CMP 
SQE 
MOV 
CMP 
9GT 
JMP 
JSR 

m:.' 



MOV 
ADD 
ADD 
MOV 
CLR 
RTI 



L05FL 

:s 

PC 

.so'+.savf: 
S1120 

141 

R5.REL0C 

20000 

•-1.3I12C 

•2CfiC0.R: 

Ri.SP 

Rl.(SP) 

R1,PC 

Rl, 31114 

Rl.SfiVPC 

i-l.RELFL 

LOSAV-RO 

PC,ROt 

R0!»320 

15i 

i320.R0 

ro.l6 
hiSav.ro 

«200.ftO 
2S 

i200.RC 

R0.I4 

3S 

L0SEG3 
PCRO^^ 
RO.HI 



-.SEE IF RELOCATION IS :€C£==AS 
:IF NOT PET-PN. 



:SEE IP THE cpCiPAr^ 



:ES'AB.I5H 



'HRoijiiH THE ^:ns 



4K r^EMCS- 



iL0SEG3" 
PC.Rl 

•-D.Rl 

Rl.il34 
31^6 



.Ri 



: PERFORM THE 'E3' 



;LCSEG3 RELOCATES BACK INTO THE FIRST UK ^EMORY BmNk. 



ij£EG2: 



MOV 
TST 
BMI 
JSR 
.WORD 
• WORD 
CLR 

5JB 



SAVPC.-.SP: 

perrfL 

IS 

R5.REL0C 

20600 

0 

3tl20 

«202Q0.Pi 

Rl.iP 



:::^3-a :-:£Mn .*!E^!:fi^ eneicisep r.A:\:: 2: 

I-Si.Pi: SRiWCH :039L£ .1:5 r!EaO«?^ TEST 
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33£«4 

3S25 

3Si5 

33r. 

33=9 

3330 
533: 
3332 
3533 
3S34 

3537 
■:c3Q 

w w ^ 

•:ci;n 

3Sh3 
35tM 

394fc 
33^r 
3S-»9 
3£-<3 
3352 
3351 
3852 
3853 
3S5M 
3555 
3B5E) 
3357 
■spec 

w Www 

3359 
33b0 
3e&I 
2362 
3S&3 
386H 
3B&5 
23b& 
3St7 
39&S 
3869 
3B7C 
2871 
287c 
3973 
2S7H 
2575 
2876 

2577 
2579 



S 



OiSaOO 
013602 

m 

0l3fciH 
C13&16 
013620 
013622 



013624 
013530 
01 3636 
C136M0 



013646 
013546 
013652 
013654 
013660 
013664 
013670 
013674 
013700 
013702 
013706 
013712 
013716 
D12722 
013730 

013732 
013740 
013746 
013750 
013750 
013754 
01375b 

013760 
013762 

012764 



160116 
160137 

ilSiS6 

gg0207 
OCOCOD 

oocooc 



005067 
226727 
101002 
005367 
JC02C7 



004567 
015104 
004767 
004767 
004767 
010367 
004567 
015124 
004767 
004767 
004767 
Q10367 
026767 
303407 

016767 
016767 
000207 

004567 
015171 
Q00733 

OQOOOO 
OOCOCO 



nnrrnri 



000114 



177766 



165106 

0001 ID 
000334 
000330 
000064 
165060 

0C0Q62 
000306 
000302 
000040 

D0Q03S 000032 



000022 000026 
000C1& 0C0016 



165004 



5'J8 

sue 



FERRFL: 
LCSFt: 



LCSEGW: 



li: 



RTS 
.UCRC 
.WORD 
.UCRC 



ClR 
CfP 
SHI 
DEC 
RTS 



i:-=E'=-"t li:59 cAiE 



R1,.SF 

Rl.aili-« 

Rl.eC 

R1.2 SP. 
o* 

n 
0 



pERRFl 
IS 

PEKRF. 
PC 



LlillTS IS CALLED TO ASK TmE -SER ^GR BOTH 
'HE HIGH AND LOU UNI9US ADDRESS LI. ITS FDR 
THE IMPENDING TEST. THE TWO LIMITS ARE LEFT IN 
SLOCK NUMBER FORM AT LOCATIONS HILIM AND 
LOLIM (THEY ARE ALSO PUT IN LOSAV AND HISAV ^ZR 
LATER USE BY THE ROUTINE DONE). A VALIDITY CHECk 
IS MADE TO MAKE SURE THE INDICATED SPAN 
IS A VALID TEST SPAN. 



LIMITS: 



2S: 



uIMERR: 



ftlLIM: 
LOLIM: 



JSR R5. SPRINT 

.WORD HIHESS 

JSR PC.INUn :ASSEM9! 

JSR PC.THRR 

JSR PC.THRR 

MOV R3.H1LIM 

JSR R5. SPRINT 

• UORD LOflESS 

JSR PC.INUM 

JSR PCJHRR 

JSR PC.THRR 

MOV R3. LOLIM 

CMP HiClM.LOLIM 

SLE LIMERA 

MOV HILIM. HISAV 

MOV LOLIM. LOSAV 

RTS PC 

JSR R5.5PRINT 

.WORD ERftMESS 

BR LIMITS 

.UORD 0 

.UORD 0 



TO PRINT ROUTINE 
.E "^HIS NUMBER. 

:G0 '0 PRINT ROJTINE 
:A5=£MB.-E THIS NJM3ER 



IF LOLIM IS GREATER 
THAN HILIM THEN GOTC 
LIMERR. ERROR 
STORE THE LIMITS IN 
SAVE REGISTERS. 
RETURN 

GO TO PRINT ROUTINE 
kRITE AN ERROR MESSA 
AND TRY AGAIN. 



: THESE ARE INTERMEDIATE STOPGE REGISTERS: 
..CSAV: .UORD 0 
hISAV; .WORD 0 



J07 



«. 4 Co 



2SS2 

■SCSI 

3S32 
3393 
339-* 
3SS5 
3S3& 
393" 
3533 

WW S ? 

33=30 
3B5i 
3592 
3S?3 
3S94 
5335 
3S3& 
3537 
3838 
3333 
3300 
3301 
3302 
3303 
3304 
33C5 
33C6 
3307 
3303 
3303 
33iC 
3311 

■5Q1? 

3313 
3314 
3315 
33i& 
2317 
3318 
3313 
3320 
3321 
3322 
3323 
3324 
3325 
332fe 
3327 
3323 
2323 
333C 

-SCSI 

3332 
2333 
2334 
zzzz 



:r3- 
p. 1 



. '-v:^^ i\i^::sE? '•a:\:: r io-sep-'s ii:53 PfiiE ss 
s^mn:" i:s2.£ ••:= "£ie«<> "est 



013770 
013772 
013774 
013776 
014002 
014006 
314012 
014016 
014020 
014024 
014026 
014032 
014036 
014042 
014044 
014046 



005046 
QG5002 
005003 
012705 
005737 
012746 
004767 
005726 
105737 
100375 
Q13746 
042716 
022716 
001011 
005726 
035716 



014052 
014056 
014062 
014064 
014066 



014072 
014076 

014100 
014104 
014110 
:i4112 
014114 



012716 
004767 
005726 
000755 
004767 



022716 
001350 

012716 
004767 
005726 
005716 
001415 



177771 
177562 
000076 
OOOccC 

177560 

177562 
177600 
000177 



000134 
000154 



000144 
000015 



000012 
000126 



CALLED TO hSSEHSlE fiN 18-BI 
TTY AND TRJNCftTE I' DCUH *C 



THIS ROUTINE IS 
NJflBER FROM Th2 
12-B!:S 
fl CALL IS MfiDE THUS: 

JMP PC , INUfI 
RES: .UORD 0 

THE NUMBER IS ASSEMBLED AND THE RESULTING Ic-BI' 
TRUNCATED NUMBER IS LEFT IN RES. UMEN AND 
RTS RETURN IS MADE. 

NOTE THAT THE NUMBER SHOULD BE SPECIFIED 
IN OCTAL DIGITS. AN CHARACTERS WHICH DO NOT 
MEET THIS SPECIFICATION IN THE INPUT STRING 
WILL CAUSE AN ERROR WHICH WILL BE SIGNALED BY 
jA ' ON THE TTY FOLLOWED BY A RETRY. 



NlM: 



li: 



2i: 



3S: 



ClR 

CLR 

CLR 

MOV 

T5T 

MOV 

JSR 

TST 

TSTB 

BPL 

MOV 

BIC 

CMP 

BNE 

T5T 

T3' 



5£a 



MCV 

JSR 

'ST 

BR 

JSR 



CMP 
BNE 

MOV 
JSR 
TST 
TST 
BEG 



-(3P; 

R2 

R3 

•-7,R5 

SiTKB 

»• >.-.'SPi 

PC^tYPIT 

'Sp) + 

3ITKS 

IS 

*lTK3.-i5F. 
•1776Cl0.i£P; 
•177. I 5P: 
c% 

.SP)* 
csp: 



li 



PC. *YPIT 
li 

PC. TYF IT 



•15. 

If 



SP! 



•12.iSP: 
PC.tYPIT 

(5P> 
4S 



PUT A ZERO MARKER 
SET UP THE TEMFOBARt 
STORAGE AND CCLNTEP 
REGISTERS. 



k^AIT FOR A CHARADES 

GET IT ONTO THE 
STACK 

IS IT RL'BCLT" 
IF NOT GOTO 2S 
IF IT WAS A RjBCL"' 
FIRST SEE IF THEE 
IS A PREVIOUS 
CHARACTER ON THE 5'h> 
IF THERE WAS NC PREVIC 
CHARACTER TAKE NO 
RUBOUT ACTION AND 
GO WAIT AT li FOR 
THE NEXT CHARACTER 
IF THERE WAS 
A PREVIOUS CHARAC'EF 
PRINT A SLASH 

IF THE LAST INFL' 
CHARACTER WAS NO"^ 
RUBOUT ECHO IT 
IS IT CR. 

NO, BRANCH TO li ="CR 

NEi'T :haractep. 

YES. PRINT A .F 



START TO ASSEMBLE 
THE NUMBER. IF "'HE 
STACK IS AT THE 



~ SI Cvl 



393fc 
395' 
3933 
3939 
3940 
3941 
3942 
3943 
39-*4 
3945 
3946 
2947 
3=19 
39*t9 
395C 
3931 
2952 
3953 
3954 
3955 
3956 
3957 
3958 
39=9 
3960 
3961 
3962 
3963 
3964 
3965 
3966 
3967 
396B 
3969 
3970 



3971 
3972 
3973 
3974 
3975 
2976 
3977 
3978 
3979 
3980 
3981 
3982 
3982 
3984 
3985 
3986 
3987 
3988 
2989 



^•=-a :-:=fN ^5^:s^ E\t«:c:5EF iflcv:: =- 

=»^'i> j:33-£ "^EHCRY TEST 



K07 



:a-5EO-r6 11:59 PfiiE 89 



014116 

Otu'sn 

014124 
C14126 
014132 
014134 
014135 
01414C 



014144 

014146 

014150 
014152 
014154 
014160 
01416c 
014166 
014170 



014172 
014172 
014176 
014200 
01 4202 
014204 
014210 
014212 
014214 
014216 

014220 
014224 
014230 
014234 
Q14236 
014242 
014244 
014252 



213604 
062704 
002022 
C627C4 
002417 
005205 
001415 
004767 



210402 

000751 

D05205 
001403 
004767 
000773 
004767 
005726 
0G02C7 



004567 
015135 
005725 
001375 
000167 
000241 
005002 
006003 
000207 

004757 
004757 
004757 
000207 
10S737 
100375 
116537 
000207 



nnnp • n 



000040 
000022 



164552 



177560 



177764 
177762 
177734 

177554 

000C02 



014254 
014262 



172100 

004757 C0C454 
012720 172120 



ADD 
8GE 
ADD 
3LT 
INC 
BEQ 
JSR 



MOV 
8R 



vSFi+.R4 

«-7C.ft4 

INERft 

•10.R4 

INEftR 

R5 

IMERR 
PC.THRR 



R4.R2 



32 



4J: INC P5 
SEQ 5S 
JSR PC. TKRf 
BR 4S 
5J: JSR PC. ONER 

TST iSP)* :flND RETURN 

RTS PC 
: ERROR HftNDLER FOR THE INL'« RCJTINE. 
:RETURNS TO THE CALLING ROUTINE. LiniTS, 
:FCR THE PARAMETER AGAIN. 
InERR: 

R5.JPRINT 
INftflES 
li: TST (SP)+ 
IJ 

INL'M .-THE ROu 



ZERO r!flRr.Er( WE fiRE 
DONE. SO GOTO 4 J 
CHECK TO SEE IF 
THE CHARACTER IS A 
VALID OCTAL DIGIT. 
IF NOT GOTO INERP. 

ARE THERE TO MANY CIGr=. 
MORE THAN 6. 
ROTATE THE DOUBLE 
LENGTH "WORD" MADE JF 
OF THE DIGITS PROCESSED 
THUS FAR 

MAKE THIS NEW DIGIT 
PART OF THE NUMBER. 
LOOP TO GET THE REST OF 
'HE NUMBER 

MAKE SURE THE NUMBER 
.HAS BEEN RIGHT JUSTIFIED 
;PR0PERL'.. 



CON'ROl. 



CNER: 



THRC: 



rypiT 



'7566 



JSR 
.WORD 
TST 
BNE 
JMP 

ROR 
ROR 
RTS 

JSR 

JSR 

JSR 

RTS 

TSTB 

BPL 

novB 

RTS 



R2 
R3 
PC 

PC.ONEP 
PC. ONER 
PC, ONER 
PC 

2ITPS 

TYPIT 

2(SP).aiTPB 
PC 



GO 



TC ASK 



TO PRINT ROUTINE 



CLEAR JUNK OFF THE 
STACK 

INE LIMITS. 

ROUTINE WHICH ROTATES 
TEMP2 AND "^EMPS ONE 
BIT TC THE RIGHT 
TREATING THEM AS A 
OPERAND. 

ROUTINE WHICH CALL 
ONER 3 TIMES. 



TYPIT TAKES THE 
WORD 2 BYTES UP IN 
THE STACK AND "PRINT£« 
IT ON THE TTY 



MOSPAR IS CALLED TO CHECK OUT tAe POSIBILITY OF TURNING 
PARITY DURING THE BRANCH GOBBLE TEST. FIRST MOSPAR SEES ^hAT 
MOS PARITY REGISTERS EXIST AND THEN IFOME ARE FOUND THEY 
ARE ENABLED AND THE INTERRUPT VECTOR IS SET TO TRAP TO PARERR A 
i WHICH WILL NOTIFY THE USER OF THE ERROR AND ITS LOCATION. 



?'AREGS=172100 
MOSPAR: JSR 
MCV 



pc.mpvect 
•pAregs.rc 



SET THE PARITY ERROR TRAP '.EC'CR. 
:ET READY TD LCOk AT '4E ^05515^: 
PARrY REGISTERS PRESE.T. 



LQ7 



BRANCH GOBBLE -^Cr .^E^CR^ ^E5T 



11:59 ^hGE q: 



3993 



014264 
ClH2ro 



012701 
012737 
pncn'57 



m im m^. 



177762 

214352 CGCCC4 
nnr>r 



3996 

3997 

3998 

3999 
--.->-> 

-ic:i 

-GC3 

^::5 
•43:7 

-2C9 

-(209 

-rDlQ 

-t211 

4012 

4013 

4014 

4G15 

4016 

4017 

•JO 19 

4019 

4020 

4021 

^022 

4023 

4024 

4025 

4026 

4027 

402S 

4029 

4030 

4031 

4022 

4033 

i336 
4027 
4035 
4029 
iZ^Z 
4041 

4:42 
t:43 

-044 

4245 
4045 
4:-.7 



014306 ::s7io 



214310 
214314 
014216 
014322 

014324 
014326 
014332 
014336 
014340 
314344 
014350 



01 4352 
014354 
014350 
014362 
014364 

014370 
014372 
014376 
014400 
014405 
014414 
014416 



005767 
100403 
004567 
015000 

010046 
004767 
004567 
015020 
005367 
012710 
000401 



000102 
164436 



165414 
154422 

000052 
OOCOOi 



022626 

062700 000002 

005201 

002751 

005767 000026 
100403 

004567 164352 
015027 

012737 001115 CC0004 
012737 000002 000036 
000207 
3QC00C 



I'Jv' I-16.R1 
MOV •M02.aii 

THF REAL REGISTERS ARE LOCATED USING A TI;.E OUT PlAN UHERE EY """z. 

POSSIBILITIES AR| REFERENCED A^^^ 9yTo?Sf^''SJIf ^ §?l 

OR IF NO TIME CUT OCCURS THEN THE REGISTER IS REAL.^UHEN A REA. 
REG 5TER IS FOUND H IS WRITTEN INTO AND READ TO DETERM N£ 
WHAT KIND OF PARITY REGISTER IT IS, CORE OR MOS. IF IT IS fICS THE.J Tr€ 
REGISTER IS SET TO ENABLE PARITY 



MPl: TST 



ii: 



TST 
BMI 

JSR 
.WORD 

MOV 

JSR 

JSR 

.WORD 

DEC 

MOV 

BR 



(RO) 



MPFL 
IS 

R5.SPRIV 
MPMES 

RO,-iSP) 

PC,02A 

RS! SPRINT 

JCftLF 

MPFL 

•l.CROi 

MPjS 



;iF THIS INSTRUCTION TIMES CUT THEN 
; THERE IS NO PARITY REGISTER AT THE 

isEripTHE TABLE HEADING HAS BEEN C-'P'J'. 

:G0 TC PRINT ROUTINE 

; OUTPUT fiN ENTRY INT: TriftT TABLE. 
:G0 TO PRINT ROUTINE 



ilF A TIME OCCURS COME HERE. CR IF THE REGISTER UfiS NOT MC5 PARrv, 



MP2: 
rP25: 



CMP 
ADD 
INC 
BLT 
TST 

3MI 
JSR 
.UORD 
MOV 
MOV 
RTS 
.WORD 



£SP)+,(SP)* 
U2.R0 
Rl 
MFl 
MPFL 

MP3 

RS.JPRINT 
NOMPAR 
ilERRTRP.3i4 
il2,3l& 
PC 
0 



BRANCH IF NOT DONE. ^. ,^ 
SEE IF ANY MOS PARITY REGISTERS Hfl.'E 
BEEN FOUND. 

.IF NOT DON'T O'JT PUT ^hE NO PARITY ^Esi-i 

;G0 TO PRINT ROUTINE 



014422 
0i-»420 



00^557 



164224 



MP3: 
MPFL: 

IF A PARITY ERROR IS DETECTED THEN A TRAP IS MADE THROUGH LOCATION 
114 TO THIS ROUTINE HERE THE USER IS TOLD OF THE PARITY ERROR AND THE 
LOCATION PLUS 2 OF THE INSTRUCTION WHICH CAUSED THE ^RROR TO^COME -OUT 
THEN A SCAN IS MADE THROUGH MEMORY. IF THE ERROR DOESN'T COME UP DURING 
THE SCAN THEN THE USER IS TOLD THAT THE ERROR WAS NOT FOUND ON THE SCAN 
IF THE ERROR IS DETECTED ON THE SCAN THEN THE USER IS TOLD WHAT LOCATION 
rLiiSn THE ERROR AND WHETHER OR NOT MEMORY MANAGEMENT WAS ON DURING THE 
SCAN IF IT WAS THEN THE PAR INVOLVED IN RELOCATING THE SAD LOCATION'S 
ADDRESS IS ALSO GIVEN TO THE USER SO HE CAN TAKE THE GIVEN 
QnnRESS AND RELOCATE IT USING THE PAR GIVEN TO FIND THE REA. MEMORY 
ADDReIs CAUSING the parity ERROR WHEN THIS HAS BEEN DONE THE lEST ;JHi:« 
WAS IN PROGRESS WHEN ThE ERROR WAS ENCOUNTERED^ I SRtSTAR'ED. -sINu 
•THE PARAMET:RS WHICH THE USER LAST INPUT TO THE PROGRAM. 

^PPEP2: P5.JPRINT :G: ^0 =RINT ROUTINE 



M07 



ME.^CRY E\E«;:iSEF '!PCM: =7 -32; l>5EP-rb ll'.S'i PAGE "^l 
BRANCH 303Sl£ r'CS y.£^ORy TEST 



M0M8 

MO"*? 

i050 

•4051 

4352 

4053 

405M 

4055 

405b 

4057 

4058 

SOS? 

4C&0 

MObl 

4Cb2 

40b3 

40b4 

40b5 

40bb 

40b7 

40b8 

40b9 

4070 

4071 

4072 

4073 

^074 

4075 

407b 

4077 

4078 

4079 

4080 

4081 

4082 

4033 

4084 

4085 

408b 

4087 

4088 

4089 

4090 

4091 

4092 

4093 

4094 

4095 

4C9b 

4397 

4098 

4099 

4100 

4101 

nl02 



014424 
01S42b 
014432 
014434 
014"40 
014444 

01444b 
014452 
014454 
0144b0 
014454 
014470 
014474 
01447b 
014502 
01450b 
014512 

014514 
014514 
C1451b 



014520 
014524 
01452b 
014532 
01453b 
014542 
01454b 
014550 
014554 
01455b 
0145bO 

0i45b4 
014572 
014574 
014b00 
014b04 
014bl0 
014bl4 
0l4b20 
014b24 
Qr4b2b 
014b32 
Ol4b24 



00bb7b 
0045b7 
015023 
0047b7 
0045b7 
C1502C 

012700 
ObD700 
0b2700 
010037 
305037 
012700 
060700 
0b2700 
010037 
005037 
005003 



012301 
QC077b 



Db2703 
D1031b 
0b2703 
0103b7 
Q047b7 
0045b7 
015045 
0045b7 
00150b 
QlOUb 
0047b7 

033727 
001423 
0047b7 
0047b7 
0047b7 
004767 
042703 
0b2703 
01131b 
0045b7 
015052 
CC47b7 



lb432b 

lb53Cb 
164314 



000052 

177772 
000114 
000 lib 
G0Q17Ei 

177772 
000304 
OCOOub 



tONT: 
II: 



.MORO 

JSP 

.WORD 

JSR 

JSR 

.UORD 

fOV 
ADD 
ADO 
MOV 

:lr 
ncv 

PDD 
ADD 

MOV 
CLR 

:lr 



10V 

sr 



PARERR 
RS.SPRINT 



;TE!.L THE USER h PARITY EROOR ::C'JPF£C. 



.. .GO TO PRINT RQUTIf^ 

"ESuES :TElL THt USER WHAT INSTRUCT CAUSE: T^-E EPPCR, 



PC,02A 
RS.SPRINT 
iCftlF 

»PARR3-.,R0 

PC.RO 

»-6.R0 

RO.StPARVEC 

2IMRVEC+2 

•PARR4-. .RO 

PC.RO 

•-6.R0 

RD.iiERRVEC 

2itRPVEC+c 

R3 



.R3)*.R1 
13 



:G0 TO PRINT ROUTINE 



:SET THE TIME AND TRAP .'ECTCeS S: 
jTHAT THE SCAN CAN BE 1ADE 



PERFORM THE 
UILL TIME OUT 



SCAN. 



EITHER THIS IN5TRUCTI3N. 



OR THE PARITY ERROR UILL 



17777b 

000002 
000126 
165204 
164212 

164204 



165162 

177572 000001 

177420 
177414 
177410 
177404 
177761 
172340 

164126 

16510b 



ONCE AGAIN OCCUR SO THAT CONTROL UILL 
BE TRANSFERRED GUT OF THIS LOOP ONE UAY 
OR ANOTHER. 

IF THE PARITY ERROR IS AGAIN ENCOUNTERRED THEN THIS PROGRAM UILL 
RECIEVE CONTROL THROUGH A TRAP THROUGH VECTOR 114. HERE THE USER 
IS GIVEN THE ADDRESS OF THE LOCATION UHICH CAUSED THE PARITY ERROR 
DURING THE SCAN. THE USER IS ALSO TOLD WHETHER OR NOT MEMORY MANAGEMENT. 
IS ENABLED OR NOT. IF IT IS ENABLED THEN THE PAR INVOLVED UITH 
THE ADDRESS RELOCATION IS H..SO GIVEN TO THE USER. 



^ARR3: 



IS: 



ADD 
MOV 
ADO 
MOV 
JSR 
JSR 
.WORD 
JSR 
.UORO 
MOV 
JSR 

BIT 

BEQ 

JSR 

JSR 

JSR 

JSR 

BIC 

ADD 

MOV 

JSR 

.UGRD 

JSR 



t-2,R3 
R3,(SP) 
«2 R3 
R3.SAVPER 
PC.02A :!* 
RS.SPRINt 
LOCBAO 
RS.SPRINT 
RECDAT 
R1,(SP) 
PC,02A 

3»SR0,»1 
2S 

PCTHRR 

PC.THRR 

PC.THRR 

PC.THRR 

•177761, R3 

«KIPAR0.R3 

(R3).(S^) 

R5, SPRINT 

KPARM 

PC,02fl 



:R3 CONTAINS THE ADDRESS PLUS 2 
;0F THE LOCATION CAUSING THE ERROR. 



IVE 



THE USER THIS ADDRESS. 
;GC TO PRINT ROUTINE 
;TELL THE USER THIS IS 
•GO TO PRINT ROUTINE 

:GIVE HIM THE IAD DATA. 



^HE ADDRESS AND 



:5EE IF MEMORY MANAGEMENT ^AS USED 
DURING tHE SCAN THROUGH MEMORY. 
IF IT WAS THEN ESTABLISH UHICH KIPAR 
IS INVOLVED UITH THE RELOCATION OF 
THIS BAD ADDRESS. 



:G0 TO PRINT ROUTINE 
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:G0 RESTART THE TEST WHICH UhS Ih PROGRESS. 



RS.JPRIMT 

NOKTll 

R5.SPRINT 

JCftLF 

SAVPER,R3 

CONT 



:G0 TO PRINT ROUTINE 
rHE SCAN SO TELL 



THE ADDRESS GIVEN FOR THE ERROR. THEN 
RESTART THE TEST WHICH WAS IN PROGRESS 
WHEN THE ERROR OCCURRED. 



R5.JPRIN" 
NOTIND 



•500. SP 

PC.2iUHERE 
ilt.PC 

PC.MOSPAR 
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2S 

REPET2 
SP0T2 



GO TO PRINT ROUTINE 

TELL THE USER THAT IS THE CASE AND 

RESTART THE SCAN WHICH WAS IN PROGRESS 

iUHEN THE ERROR WAS ORIGINALLY 
;ENCOUNTfRRED. 

; RESTART THE TEST WHICH WAS INPROGRESS 
;WHEN THE ORIGINAL PARITY ERROR WAS FIRST 
;ENCOUNTERRED. SEE IF RELOCATION INTO -^WE 
;FISRT 4K BANK IS NECESSARY. 

;G0 RESET THE PARITY REGISTERS BEFORE 
; STARTING EITHER A MEMORY MANAGED 
;0R NON MEMORY MANAGED TEST. 
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•EN^'H: .Uwm2 



■4.53 

R3.R4 
R4 

«P3. 

.R3« 

2i 

>R-i 

li 

.*4 



;fi4; 

INCSl 
>4 

SiREwC 
0 

i*^A5'-f: 



m 

-r:|5 

^£25 
-'££& 

^tfs 

•*££S 
■»£30 
■»231 
-£52 
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